VBA suppression de ligne de par son numero

vgendron

XLDnaute Barbatruc

• 3 Janvier 2017

• #2

https://www.excel-downloads.com/threads/suppression-dune-ligne-par-son-numero-pour-diop.20013964/

 

Vote positif 0 Vote négatif

K

Kim75

XLDnaute Occasionnel

• 3 Janvier 2017

• #3

Hello Diop, vgendron 🙂

VB:

Sub SupprimeLigne()
    Last = Cells(Rows.Count, "A").End(xlUp).Row
    For i = Last To 1 Step -1
        If (Cells(i, "C").Value) = 100 Then
            Cells(i, "A").EntireRow.Delete
        End If
    Next i
End Sub

Cordialement, Kim.

 

Vote positif 0 Vote négatif

D

DIOP

XLDnaute Nouveau

• 3 Janvier 2017

• #4

Kim75 à dit:

Hello Diop, vgendron 🙂

VB:

Sub SupprimeLigne()
    Last = Cells(Rows.Count, "A").End(xlUp).Row
    For i = Last To 1 Step -1
        If (Cells(i, "C").Value) = 100 Then
            Cells(i, "A").EntireRow.Delete
        End If
    Next i
End Sub

Cordialement, Kim.

Cliquez pour agrandir...

mon probleme est que je veux automatiser sa pour n'importe quel numero de ligne à supprimer

 

Vote positif 0 Vote négatif

L

laetitia90

XLDnaute Barbatruc

• 3 Janvier 2017

• #5

bonjour tous 🙂🙂🙂🙂
peut être une evenementielle

je supprime ma reponse je viens de me rendre compte que l'ami vgendron🙂🙂 venait de te donner
une solution sur un autre post trés recent cela te plaisait me semble t'il !!!! pourquoi un autre post sur le méme sujet...... pas contente leti 😡😡
je m'excuse auprés de vgendron🙂🙂 de n'avoir pas lu son post

 

Dernière édition: 3 Janvier 2017

Vote positif 0 Vote négatif