Comment insérer une valeur (macro/VBA) ?

Bonjour,

Je cherche à insérer dans 3000 fois la même valeur dans 3000 cellules d'une même colonne.
Exemple : lorsque je clique sur un bouton, la date du jour vient dans les 3000cellules
sur un autre bouton, c'est la date de la veille. Et un troisième, il me demande la date.
cette opération sera répétée chaque jour. Donc a chaque fois que je demande fois que je veux réaliser la fonction, il doit décaler d'une colonne. Dans la ligne 1 de la colonne, il doit également indiquer la date de l'opération.
Si quelqu'un peu m'aider à faire cette opération,je le remercie d'avance
Etienne Heyman