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 :
Merci d'avance
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
Partager