Dans une macr, je souhaite supprimer toutes les lignes ne correspondant pas a ma recherche mais je ne sais pas pourquoi, la condition que je fixe n'est pas respectee.
Je vous propose de jeter un oeil au fichier qui est beaucoup plus parlant.
Sub Macro()
Application.ScreenUpdating = False
For i = [B65000].End(xlUp).Row To 5 Step -1
If Cells(i, 2) <> "Type1" And Cells(i, 2) <> "Type2" Then Rows(i).Delete
Next i
End Sub
pierrejean, j'opte pour ta solution mais il s'agissait de garder Type1 et Type 2 et de supprimer les autres.
Or, quand je remplace ta ligne de code : If Cells(n, StartCell.Column) = "Type1" Or Cells(n, StartCell.Column) = "Type2" Then
Par : If Cells(n, StartCell.Column) <> "Type1" Or Cells(n, StartCell.Column) <> "Type2" Then
Tout s'efface.