XL 2013 contrôle toupie ActiveX

[Nico77]

Bonjour

J'ai c'est deux ligne de code qui fonctionne .(l'une ou l'autre)
Déplacement d'un clic de 7 colonnes a chaque fois.

ActiveWindow.SmallScroll ToRight:=7 (droite/aller)
ActiveWindow.SmallScroll ToRight:=-7 (gauche/retour)

Mais je n'arrive pas a les faire fonctionné ensemble avec le bouton toupie (droite/gauche) sans limite de déplacement.

C'est ligne doit fonctionné individuellement avec le même bouton "SpinButton1".

comment faut il faire?

Merci
Bonne journée.

 

[Eric C]

Bonjour le forum
Bonjour et bienvenue Nico77

Essaye avec ce fichier
Bonne journée
@+ Eric c

 

[sylvanu]

Bonjour Nico, et bienvenu sur XLD, bonjour Eric
On peut aussi utiliser simplement deux Forms quelconques associées à deux macros.
Cela permet de pouvoir varier les formes, et le code est le même :

Sub Droite()
    ActiveWindow.SmallScroll ToRight:=7
End Sub
Sub Gauche()
    ActiveWindow.SmallScroll ToRight:=-7
End Sub

 

[Nico77]

Re
Super Merci

Je viens de pensé; si j'ai besoin de faire la même chose mais de bas en haut.

ActiveWindow.SmallScroll Down:=1 (descend)
ActiveWindow.SmallScroll Down:=-1 (monte)

comment faire?
Merci

 

[Eric C]

Re le fil

Private Sub SpinButton1_SpinDown()
ActiveWindow.SmallScroll down:=1       
End Sub

Private Sub SpinButton1_SpinUp()
ActiveWindow.SmallScroll up:=1   
End Sub

@+ Eric c

 

[Nico77]

Bonjour

un Grand Merci Eric
pour ta rapidité et compétence
Bonne journée