Programme VBA excel

J'aimerai développer un programme sous VBA excel qui permettrait de comparer des cellules et un mot donné, si ce mot n'est pas trouvé dans la cellule alors la ligne est supprimée.

J'ai déjà fait ça, mais je bloque :

Sub g()

Dim mot1 As String = "POS-TRADE"

For i = 200 To 1 Step -1
If StrComp((Cells(i, 3)), mot1)==1
Then Rows(i).Delete
i = 200
Next

End Sub
Configuration: Windows XP
Internet Explorer 6.0

1 réponse

  1. Contributeur
    C'est inutile de refaire un nouveau poste pour un question déjà posée.
    Tu peu faire remonter ta question en repostant un UP.