MACRO pour supprimer les lignes qui ne contiennent pas le texte "cible"

Bonjour

Je souhaiterais pouvoir supprimer toutes les lignes qui ne contiennent pas le texte "DRP_DPSM_SUD" dans la colonne G "Code service" avec une macro
ça fait une heure que j'essaye de trouver comment faire mais comme je débute en Macro, je n'y arrive pas.
J'espère que quelqu'un du forum aura l'amabilité de m'expliquer ce qu'il faut faire.

D'avance merci

Bonsoir,

Supprimé

Bonsoir,

le code de votre macro 2 est bon, c'est seulement le fait qu'il faut faire le test sur la colonne 7 et non pas la 6 : 6=F, 7=G

Sub Macro2()
    For i = ActiveSheet.UsedRange.Rows.Count To 1 Step -1
        If Not Cells(i, 7) Like "*DRP_DPSM_SUD*" Then Rows(i).Delete
    Next
End Sub

@ bientôt

LouReeD

ça fonctionne très bien, je vous remercie

Bonsoir,

merci de votre retour et remerciement !

@ bientôt

LouReeD