Déplacement d'un bouton

[Gérard du 13]

😕
Bonjours a tous et bonne année ainci que la santé pour pouvoir continuer a faire vivre le forum.
Ma question aujourd'hui est un peut spéciale.j'ai vu dans differants exercices dans le forum qu'il était possible de faire suivre le bouton de commande d'une macro sur l'écran mème quand on se déplace de plusieures lignes ou collones.
Ca me simplifirait la tache si on peut m'en dire plus?......😀
Merçi Gérard du 13

 

[Pierrot93]

Re : Déplacement d'un bouton

Bonjour Gerard

regarde le code ci dessous, place le bouton 3 cellules en dessous de la cellule sélectionnée, s'exécute à chaque selection sur la feuille :

Code à placer dans le module de la feuille concernée.

Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Shapes(1)
    .Top = Target.Offset(3, 0).Top
    .Left = Target.Left
End With
End Sub

bon après midi
@+

 

[Gérard du 13]

Re : Déplacement d'un bouton

Merci Pierrot j'essairais se soir.
et je te dirais si c'est OK