Suppression ligne suivant contenu cellule

[jeff1494]

Bonjour à tous;
Encore moi (Le boulet) 😕😕 .
Voilà je voudrais en VBA pouvoir supprimer la ligne dont une cellule contient les mots "MONTANT H.T :"
Sachent que cela doit être inséré dans une boucle.
Merci d'avance à tous et bonne journée.

 

[alex67800]

Re : Suppression ligne suivant contenu cellule

Bonjour jeff1494,
peut-être comme ceci:
https://www.excel-downloads.com/threads/suppression-lignes-si.109564/
Un petit tour via la recherche ou les dixcutions similaires te permttrait sûrement de trouver ton bonheur.

 

[jeff1494]

Re : Suppression ligne suivant contenu cellule

Bonjour Alex67800;
Je vais regarder les liens que tu m'as donné.
Merci pour ton aide et bonne journée.
A+

 

[JCGL]

Re : Suppression ligne suivant contenu cellule

Bonjour à tous,

Peux-tu essayer avec :

Option Explicit
Dim Cel As Range
Sub Cherche_Del()
Application.ScreenUpdating = 0
With Worksheets(1).Range("A1:E200") 'plage à adapter
    Set Cel = .Find("Montant", LookIn:=xlValues)
    If Not Cel Is Nothing Then
        Do
            Cel.EntireRow.Delete
            Set Cel = .Find("Montant", LookIn:=xlValues)
        Loop While Not Cel Is Nothing
    End If
  End With
Application.ScreenUpdating = 1
End Sub

A+