à l'aide d'une macro, je voudrais supprimer la ligne où se trouve une des informations suivantes : x1, x2,x3,x4,x5,y1,y2,y3,y4,y5
dans une cellule de la colonne A
je peux passer par le contrôle de chaque cellule de la colonne A en faisant une recherche de la derniére cellule vide et d'effectuer ensuite un contrôle par rapport à chaque valeur......mais c'est long
nbre = Range("a65536").End(xlUp).Row
cpt = nbre
For cpt = nbre To 1 Step -1
Range("a" & cpt).Select
MsgBox "a"
If Range("a" & cpt).Value = "x1" Then
ActiveCell.EntireRow.Delete
Else
End If
If Range = "x2" Then
ActiveCell.EntireRow.Delete
Else
End If (etc etc etc avec x3 puis x4 puis Y1....)
Next
je pense qu'il y a moyen de passer par l'identification d'une liste, puis de faire la suppression de la ligne si la valeur de la cellule appartient à la liste
merci pour vos suggestions
chantal
dans une cellule de la colonne A
je peux passer par le contrôle de chaque cellule de la colonne A en faisant une recherche de la derniére cellule vide et d'effectuer ensuite un contrôle par rapport à chaque valeur......mais c'est long
nbre = Range("a65536").End(xlUp).Row
cpt = nbre
For cpt = nbre To 1 Step -1
Range("a" & cpt).Select
MsgBox "a"
If Range("a" & cpt).Value = "x1" Then
ActiveCell.EntireRow.Delete
Else
End If
If Range = "x2" Then
ActiveCell.EntireRow.Delete
Else
End If (etc etc etc avec x3 puis x4 puis Y1....)
Next
je pense qu'il y a moyen de passer par l'identification d'une liste, puis de faire la suppression de la ligne si la valeur de la cellule appartient à la liste
merci pour vos suggestions
chantal