Macro suppression de ligne contenant une valeur

[chris6999]

Bonsoir


Je souhaiterais supprimer toutes les lignes d'une plage de cellule (exemple A1 à I500) lorsque une valeur est présente dans la ligne en question.
exemple supprimer les lignes contenant "et" même si les caractères sont accolés à d'autres comme dans le cas ci après Jacquesetpaul

J'ai testé pas mal de codes mais rien ne fonctionne

Si vous avez une solution, n'hésitez pas à me faire partager vos lumière

Merci d'avance
Cordialement

 

[Hulk]

Re : Macro suppression de ligne contenant une valeur

Slt,

Essaie avec Like...

    For Each cel In Range("A1:I500")
        If cel.Value Like "*et*" Then
            cel.EntireRow.Delete
        End If
    Next cel

 

[Si...]

Re : Macro suppression de ligne contenant une valeur

Salut,

prendre à rebours :

Option Explicit
Sub efface()
  Dim L As Long, C As Range
  Application.ScreenUpdating = False
  For L = 500 To 1 Step -1
    For Each C In Range("A" & L & ":I" & L)
      If C Like "*et*" Then Rows(L).Delete
    Next
  Next
End Sub

 

[chris6999]

Re : Macro suppression de ligne contenant une valeur

Bonsoir

Cela n'a pas fonctionné donc j'ai trouvé une solution de contournement
Merci quand même