Suppression derniere ligne par code vba

Bonjour à tous,
Je sollicite votre aide en supprimant la dernière ligne d’un tableau par code VBA. Vous trouvez ci-joint un fichier contenant une petite explication,
Vous remerciant par avance,
Cordialement,

Bonjour Panda,
Le fichier est “magnifique” :grin:

Hihi,
Est-ce que ma question a une solution?

Re,
Peut-être, avec un classeur joint

ah d’accord, désolé pour l’oubli!

suppression ligne automatique.xlsx (12,1 Ko)
Merci

Re,
A voir

La macro

Sub SuppDernLigne()
  Dim Dl%
  Dl = Feuil1.Range("B" & Rows.Count).End(xlUp).Row 'n° de la dernière ligne non vide de la colonne B
  Rows(Dl).Delete shift:=xlUp 'Supprime la ligne vers le haut
End Sub

suppression ligne automatique.xlsm (17,9 Ko)

Re,
Merci à toi, juste une question, si le tableau commence sur la colonne C, est-ce que le code change? Si c’est le cas, pourras-tu l’envoyé?
Merci encore

Re, tu modifies au niveau de la macro qui se trouve dans la feuille
Au lieu de
Dl = Feuil1.Range("B" & Rows.Count.....

tu remplaces le B par le C
Dl = Feuil1.Range("C" & Rows.Count....

2 « J'aime »

Merci beaucoup Mimimathy!
Bon week-end!