macro à la suite

[Cruz]

(re) Bonjour tout le Monde

J'aimerai connaitre le code qui permet qu'une macro s'execute chaque fois dans la cellule en dessous. Je sais que cette manoeuvre est souvent utilisée mais je n'arrive pas à saisir le bon code.

Par exemple j'ai un bouton sur ma feuille, j'aimerai qu'à chaque clic, la cellule A1 soit copiée dans la colonne B:B . Le 1er clic en B1, le 2e en B2....

pouvez-vous m'aider ?
merci d'avance
bonne journée
a+
cruz

 

[pierrejean]

voila:

Cells(Range('B65536').End(xlUp).Row + 1, 2) = Cells(1, 1)

 

[Cruz]

merci beaucoup
c'est super sympa

bonne journée
a+