J'ai une ScrollBar dans une User form, j'aimerai pouvoir bouger ma feuille jusque la cellule S1 lorsque ma scrollbar est à fond sur la droite, puis revenir en A1 lorsque celle ci est à fond sur la gauche.
Merci de pouvoir m'aider car je suis en recherche depuis ce matin =)
Merci pour ton aide, cela fonctionne (pas vraiment entre la cellule A1 et S1 mais beaucoup plus). Cela fera l'affaire quand même. Sais tu comment le faire mais dans une colonne ? (A1 => A 200)
Private Sub ScrollBar1_Change()
ActiveWindow.ScrollColumn = Me.ScrollBar1.Value + 1
End Sub
Private Sub UserForm_Initialize()
Me.ScrollBar1.Max = ActiveSheet.Cells(2, Columns.Count).End(xlToLeft).Column
End Sub