Déclancher une macro si mouvement scrollbar

Bonjour le forum,

J'aimerai simplement savoir comment je peux déclencher une macro si la valeur de la scrollbar est modifiée ?

merci d'avance

Bonjour,

s'il s'agit de barre de défilement ActivX :

dans la feuille de code de la feuille

Private Sub ScrollBar1_Change() ' pour la barre de défilement ScrollBar1
MaMaCro 'lance la macro MaMaCro
End Sub

s'il s'agit de barre de défilement formulaire:

affecter la macro à la barre de défilement

au déplacement du curseur pour l'un ou l'autre cas , la macro sera lancée.

A+

Bonjour ALGOPLUS,

J'ai déjà essayé avec le fonction "CALL", mais cela n'a rien donné.

Dans scrollbar1 change j'ai déjà assigné les caractéristiques suivantes :

Private Sub ScrollBar1_Change()

    ScrollBar1.Min = Feuil4.Range("d2")
    ScrollBar1.Max = Feuil4.Range("d3")
    Feuil4.Range("d4") = ScrollBar1.Value

End Sub

est-ce que ceux-ci peuvent avoir un impacte sur l'appel de la macro?

up

Bonjour,

A priori ... déclencher une macro à chaque modification de scrollbar pourrait être redondant ...

Cela dit ... pas de raison objective pour que cela ne fonctionne pas ...

La solution proposée par AlgoPlus fonctionne ...

Private Sub ScrollBar1_Change()
    ScrollBar1.Min = Feuil4.Range("D2")
    ScrollBar1.Max = Feuil4.Range("D3")
    Feuil4.Range("D4") = ScrollBar1.Value
    MsgBox "Bonjour ..."
    Application.Run ("TaMacro")
End Sub

Peux-tu joindre un fichier test ...?

Autant pour moi James007,

J'ai fais une petite boulette dans l'utilisation de mes scrollbar.

j'avais écris la fonction call dans la mauvaise, et le pire c'est que sur la feuille en question je n'avais que deux scrollbar……….(Week-end compliqué )

Merci pour votre aide !

Re,

Content que tu aies pu régler ton problème ...