Bonjour,

Je débute en progammation VBA et j'essai de programmer une interface qui me permettrais de saisir des informations dans 5 pages excel différentes, ligne par ligne.

Pour saisir pas de probleme, mais je voudrais créer un bouton me permettant d'effacer la derniere ligne de chacune de mes pages.

J'ai déjà programmé ceci mais je ne vois pas comment faire la suite :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Private Sub CommandButton6_Click()
Dim DernierLigne As Long
 
   Range("A1").Select
     DernierLigne = Selection.End(xlDown).Row
 
   Call Range("A" & DernierLigne).EntireRow.Delete(xlUp)
 
End Sub
Merci d'avance