Je suis débutant en VBA , je veux crée une bouton pour insérer la date dans une seule colonne "Date" et pour chaque click en passe a ligne suivante.

Exemple :

A4 contient une date
Click A5=Date Aujourdhui
etc

Code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
Private Sub CommandButton1_Click()
ActiveCell.FormulaR1C1 = DateValue(Date)
ActiveCell.Offset(0, 1).Range("A1").Select
End Sub