desire de mon macro:
si cellule g1 >1 alors effacer ligne 1
si cellule g2>1 alors effacer ligne 2
etc sur 50 lignes.

ma premiere ebauche:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Private Sub avis2_Click()
Dim macellule As Range
    Range("g2:g52").Select
    For Each macellule In Selection
        If macellule > 1 Then
            Rows("2").Delete Shift:=xlUp
        End If
    Next macellule
la je control bien mes cellules "g" mais que la ligne 2
comment puis je faire pour déclarer la deuxieme variables lignes.
MERCI D'AVANCE