S
setsix
Guest
bonjour
j'ai le code suivant mais je n'y arrive pas
Sub Macro1()
'
'
Dim d As Range
For Each d In Range("c2", Range("c65535").End(xlUp))
If d <> "X" Then
d.EntireRow.Delete
End If
Next d
End Sub
il me supprime les lignes avec Y dans la colonne C mais pas les lignes avec Z.
merci d'avance
j'ai le code suivant mais je n'y arrive pas
Sub Macro1()
'
'
Dim d As Range
For Each d In Range("c2", Range("c65535").End(xlUp))
If d <> "X" Then
d.EntireRow.Delete
End If
Next d
End Sub
il me supprime les lignes avec Y dans la colonne C mais pas les lignes avec Z.
merci d'avance