Une macro pour coller la cellule active dans la ligne 1 ?

Bonjour Forum !

Je souhaite créer une petite macro toute bête, mais mon niveau en VBA est insuffisant...

J'ai juste besoin d'une macro qui colle sur demande (je créerai le raccourci clavier qui va bien) la cellule active dans la ligne 1 de la même colonne.

Je sens bien que ça doit être bête comme chou mais je ne sais pas faire...

Help !

Bonjour,

Une macro toute simple

Sub Macro1()
    ActiveCell.Select
    Selection.Copy
    Cells(1, ActiveCell.Column).Select
    ActiveSheet.Paste
End Sub

En VBA la touche F1 est très utile , il ne faut pas hésiter à en abuser

il suffit de double cliquer sur la cellule à copier.

Merci à tous les 2, c'est parfait !

Pour ce qui est de la touche F1, ça aide ponctuellement, et je m'en sers beaucoup, mais ça ne permet pas de combler une absence totale de formation en VBA....

Bonjour Forum !

Je ressuscite ce sujet pour un petit complément :

quelqu'un peut-il m'aider à adapter le code pour qu'il fonctionne sur plusieurs cellules (même en sélection discontinue) ?

Merci !!!

Le code à "perfectionner" c'est :

Sub Macro1()
    ActiveCell.Select
    Selection.Copy
    Cells(1, ActiveCell.Column).Select
    ActiveSheet.Paste
End Sub