Bonjour à tous, Bonjour à toi,
Je souhaite utiliser une boucle While wend, mais j'aurais besoin d'inserer plusieurs conditions.
j'aimerais que vb regarde dans ma colonne A si il ya "exemple1" ou "exemple2" ou "exemple3" et que toutes le autres lignes soit supprimées si par exemple j'ai dans ma colonne A "exemple4", "exemple5".
Ainsi je me retrouverais avec seulement les lignes ou j'ai dans ma 1ere colonne "exemple1" ou "exemple2" ou "exemple3"
Voici le code bancale utilisé: ( le decompte des lignes commence a la ligne 2 car j'ai un entete.
Merci pour vos conseils !!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Sub test() lDerniereLigneReelle = Range("A2").End(xlDown).Row For i = 2 To lDerniereLigneReelle While (Range("A" & i) <> "exemple1" or "exemple2" or "exemple3" Rows(i).Select Selection.Delete Shift:=xlUp Wend Next i End Sub
Partager