VBA/Macro pour copier-coller

Bonjour à tous,

J'aurais besoins de votre aide.

Exemple : Ma cellule A1 = maintenant()

Je voudrais que lorsque que j'exécute la commande, un copier de la cellule A1 soit réalisé et qu'il soit coller (en valeur) dans la Colonne B. La première fois le coller doit s'effectuer en B1 et par la suite à chaque excution, en B2, B3 ainsi de suite.

Bref, je ne suis pas capable de faire effectuer le coller dans la cellule suivante.

Merci beaucoup pour votre temps !!

Bonjour,

une proposition

Sub copier()
dl = Range("B" & Rows.Count).End(xlUp).Row
Cells(dl + 1, 2) = now()
End Sub

Merci beaucoup !!

Cela fais parfaitement la job.