Test sur le premier caractere de la premiere cell

fif · 26 Octobre 2005

Bonjour le forum.

Tit' questions qui ne devrait pas poser de problèmes aux utilisateurs VBA.
Je cherche à supprimer une ligne si le premier caractere de la premiere cellule remplie (qui sera toujours dans la colonne A) n'est pas un F.
Supprimer les lignes ça va. Par contre je ne sais pas quoi utiliser pour le test
Merci pour vos avis éclairés.

Abel · 26 Octobre 2005

Bonjour fif, le forum,

Essaie ce code (fais d'abord en pas à pas et sur un tableau d'essai pour voir ce qui se passe) :

Code:

Sub SupprimeF()
Dim dl
dl = Range('a65536').End(xlUp).Row
For i = dl To 1 Step -1
If UCase(Left(Range('a' & i), 1)) = 'F' Then Range('a' & i).EntireRow.Delete
Next i
End Sub

En espérant que cela te dépanne.

Abel.

fif · 26 Octobre 2005

Ok c'est énorme, je ne pensais pas qu'on pouvait réutiliser le 'left'
Merci bcp Abel.

Test sur le premier caractere de la premiere cell

fif

Guest

Abel

XLDnaute Accro

fif

Guest

Discussions similaires