Bonjour à tous, pouvez vous m'aider sur mes 2 problêmes.

J'ai une ligne de code qui ne sauvegarde que les lignes avec la condition "100"
Comment lui ajouter une deuxième condition "200" ? ou une troisième "300" ?

Comment faire pour que la macro ne s'arrête non pas à la première ligne vide mais à la 2ème ligne vide en continue car mon fichier comporte des lignes de données puis 1 ligne vide puis des données ainsi de suite 1 ligne sur deux

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
While (Range("A" & i).Value <> "") 
     If Left(Range("A" & i).Value, 1) <> "100" Then 
           Rows(i).Delete
     Else
            i = i + 1
     End If
Wend
Merci pour l'aide