Supprimer les 3 dernières lignes de mon tableau

Bonjour à tous,

Après moult recherches je ne trouve pas mon bonheur...

Je souhaiterais faire une macro pour supprimer les 3 dernières lignes de mon tableau

Ma ligne de code me permet de supprimer la dernière ligne, mais comment étendre cette sélection aux 2 précédentes, j'ai essayé avec Offset mais je dois mal l'intégrer au code, ou y-a-t-il un moyen de répéter l'opération 3 fois ?

Sub Supprimer_dernier_produit()

Rows(Range("G" & Rows.Count).End(xlUp).Row).Delete

End Sub

Merci pour votre aide.

Bonjour,

Feufeuf44 a écrit :

....comment étendre cette sélection aux 2 précédentes, j'ai essayé avec Offset mais je dois mal l'intégrer au code

Sub Supprimer_3_derniers_produits()
  Rows(Range("G" & Rows.Count).End(xlUp).Offset(-2).Row).Resize(3).Delete
End Sub

Feufeuf44 a écrit :

....ou y-a-t-il un moyen de répéter l'opération 3 fois ?

Sub Supprimer_3_derniers_produits()
  Rows(Range("G" & Rows.Count).End(xlUp).Row).Delete
  Rows(Range("G" & Rows.Count).End(xlUp).Row).Delete
  Rows(Range("G" & Rows.Count).End(xlUp).Row).Delete
End Sub

Bonjour Patrice 33740,

Merci infiniment pour votre aide

ça fonctionne parfaitement