Bonjour à tous,
J'ai crée une VBA qui supprime les lignes en fonction d'une valeur sur une colonne :
Sub DelThyro()
Application.ScreenUpdating = False
For i = 1000 To 11 Step -1
If Not Cells(i, 11).Value = "EPOX-MA-HEURE-THYRO" Then Rows(i).Delete
Next
End Sub
Elle me permet de supprimer les lignes entières où se trouve "EPOX-MA-HEURE-THYRO" dans la colonne K.
J'aimerai rajouter un argument qui est "EPOX-MA-HEURE-MAKITA", j'ai déjà essayé ce code là :
Sub DelThyro()
Application.ScreenUpdating = False
For i = 1000 To 11 Step -1
If Not Cells(i, 11).Value = "EPOX-MA-HEURE-THYRO""EPOX-MA-HEURE-MAKITA" Then Rows(i).Delete
Next
End Sub
Mais ça me supprime toutes les lignes... Pouvez-vous me renseigner? Merci d'avance.
Je vous ai mis en pièce jointe un fichier EXCEL avec mes deux VBA.