OVH Cloud OVH Cloud

Supprimer ligne

2 réponses
Avatar
BJ
Bjr,

Je voudrais supprimer une ligne entière lorsqu'une condition est atteinte
par exemple dans la cellule C de la ligne testée et cela sur l'ensemble de
la feuille.

Merci

2 réponses

Avatar
Joel
Bonjour,

p'tiot réponse rapide :

Sub SupprimeLigne()
Dim i As Long
For i = 65536 To 1 Step -1
If Range("C" & i).Value = "Condition" Then
Range("C" & i).EntireRow.Delete
End If
Next
End Sub


--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"BJ" a écrit dans le message de
news:%_rKc.5635$
Bjr,

Je voudrais supprimer une ligne entière lorsqu'une condition est atteinte
par exemple dans la cellule C de la ligne testée et cela sur l'ensemble de
la feuille.

Merci




Avatar
BJ
Super
Merci beaucoup

"Joel" a écrit dans le message de
news:cddjj4$8np$
Bonjour,

p'tiot réponse rapide :

Sub SupprimeLigne()
Dim i As Long
For i = 65536 To 1 Step -1
If Range("C" & i).Value = "Condition" Then
Range("C" & i).EntireRow.Delete
End If
Next
End Sub


--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"BJ" a écrit dans le message de
news:%_rKc.5635$
Bjr,

Je voudrais supprimer une ligne entière lorsqu'une condition est
atteinte


par exemple dans la cellule C de la ligne testée et cela sur l'ensemble
de


la feuille.

Merci