Clever-Excel-Forum

Normale Version: Scrollbar durch VBA auf bestimmten Wert ziehen
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo zusammen,

gibt es die Möglichkeit, durch einen Code in VBA die ScrollBar automatisch auf einen bestimmten Wert zu ziehen?

Wie im angehängten Bild möchte ich z.B. durch einen Klick auf den Button A, dass der Slider automatisch auf bspw. Porsche gezogen wird (bei B auf Renault u.ä.)

Vielen Dank schon mal für Eure Hilfe.

Viele Grüße
Mark
Hallo Mark

Und wann gibst du ein Feedback auf diese Antworten?
https://www.clever-excel-forum.de/index.php

Und wenn du diese Antworten liest, bekommst du selbst das Resultat das du hier wünscht.

Gruss Guschti
Hallo Guschti,

ein Feedback auf welche Antworten meinst du?
Das verstehe ich nicht.

Meine Frage ist doch, ob ich durch ein Makro (Klick auf Button) automatisch den Slider auf bspw. Porsche setzen kann.

Gruß
Markus
Hallo Markus

Sorry, diese
https://www.clever-excel-forum.de/Thread...#pid163813

Du hast nicht geantwortet, ob du es auch verstanden hast.

Gib der Schaltfläche den gewünschten Wert an

Code:
Private Sub CommandButton1_Click()
    Tabelle1.scollbar1.Value = 2
End Sub

Gruss Guschti
Hi Marc,

das mal als Denkansatz:

Code:
Private Sub CommandButton1_Click()
   Call ScrollbarPositionieren("A")
End Sub

Private Sub CommandButton2_Click()
   Call ScrollbarPositionieren("B")
End Sub

Private Sub CommandButton3_Click()
   Call ScrollbarPositionieren("B")
End Sub

Sub ScrollbarPositionieren(WelcherButton As String)

   Select Case WelcherButton
       Case "A"
           ScrollBar1.Value = 2
       Case "B"
           ScrollBar1.Value = 4
       Case "C"
           ScrollBar1.Value = 7
   End Select
   
End Sub

Setzte den Scrollbalken so, dass er links und rechts mit den Fahrzeug-Zellen darunter abschließt. In den Eigenschaften gibst du ein:

Min = 1
Max = 8 (Anzahl der Fabrikate)