peper_eliot
XLDnaute Junior
Bonsoir tout le monde.
Je fais rapidement appel à vous pour un truc qui, j'en suis sûr, est bête comme chou pour les habitués du forum 😉
Je cherche à supprimer les lignes d'un tableau qui ne correspondent pas à un certain critère
Voici le bout de code correspondant :
J'arrive à boucler sur les données de ma colonne 2
Je suis capable de connaître le N° de la ligne à supprimer... Mais ne ne sais pas supprimer la ligne... D'ailleurs je me demande même si c'est "possible" car en faisant de la sorte, je réduit à chaque fois la sélection.
Alors voilà, si quequ'un passe par là et me donne une piste, je l'en remercie par avance 😉
Je fais rapidement appel à vous pour un truc qui, j'en suis sûr, est bête comme chou pour les habitués du forum 😉
Je cherche à supprimer les lignes d'un tableau qui ne correspondent pas à un certain critère
Voici le bout de code correspondant :
VB:
Sub Macro1()
Dim c As Range
ActiveSheet.ListObjects("Tableau1").ListColumns(2).DataBodyRange.Select
For Each c In Selection
If Left(c, 10) <> "QUALIF2021" Then
'MsgBox ("pas 2021")
'MsgBox (c.Row)
'Suppression de la ligne du tableau
End If
Next
End SubJe suis capable de connaître le N° de la ligne à supprimer... Mais ne ne sais pas supprimer la ligne... D'ailleurs je me demande même si c'est "possible" car en faisant de la sorte, je réduit à chaque fois la sélection.
Alors voilà, si quequ'un passe par là et me donne une piste, je l'en remercie par avance 😉