Début en VBA - besoin d'aide

riquet

XLDnaute Nouveau
Bonjour
je commence à regarder le VBA et je souhaite commencer par des choses simples pour bien comprendre le fonctionnement.
Ce que je cherche a faire :
Lorsqu'on clique sur un bouton (dont j'affecterais la macro), je souhaite que celui ci "copie" simplement le contenu de la cellule qui se trouve à sa droite. Je parle bien de copie et non copier+coller.
J'aurais environ 10 boutons à affecter à cette même macro.
J'ai trouvé sur un forum comment determiner la position du bouton, mais mes compétences ne sont pas suffisantes pour modifier cette macro.
"
Sub test()
Dim Bouton As Shape
Set Bouton = Shapes(Application.Caller)
MsgBox Bouton.TopLeftCell.Address(0, 0)
End Sub"

Merci d'avance pour votre aide
 

Dranreb

XLDnaute Barbatruc
Bonjour.
Essayez comme dernière instruction avant End Sub :
VB:
Bouton.BottomRightCell.Offset(, 1).Copy
 

Discussions similaires


Haut Bas