Bouton Mobile

J'ai crée un bouton auquel j'ai affecté une macro. Comment faire pour que ce bouton se déplace en même temps que la cellule active ?

Avec un bouton créé avec la barre d'outils formulaire 

Private sub Worksheet_SelectionChange(ByVal Target As Range)
 ActiveSheet.Shapes("Button 1").Left = Target.Left
 ActiveSheet.Shapes("Button 1").Top = Target.Top
 end sub

Auteurs : ,

Mots clefs associés à cette page : ,