Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

SpinButton + Variable x-Achsen Scrollbar

Forumthread: SpinButton + Variable x-Achsen Scrollbar

SpinButton + Variable x-Achsen Scrollbar
26.11.2019 11:41:29
Felix
Hallo zusammen,
nachfolgend die Test-Datei:
https://www.herber.de/bbs/user/133440.xlsm
In der Test-Datei (Urlaubsplan) gibt es 3 SpinButtons, welche für die Navigation → auftretenden Fehler, Kalenderwochen und Monate dienen.
Ein Fehler entsteht, sobald 2 Mitarbeiter zur gleichen Zeit im Urlaub sind, angezeigt wird dies in der Zeile 6.
Durch Betätigung der SpinButtons springt er immer in die Zeile 12 (Tage) und in die Spalte, welche in den Zellen C1 (Fehler); C2 (Kalenderwochen); C3 (Monate), durch die VERGLEICH-Funktion ermittelt wird.
In der Original-Datei haben wir ca. 40 Mitarbeiter und das Problem ist, dass sobald der Sprung zur Zielzelle erfolgt, soll sich die Scrollbar der horizontalen x-Achse so weit nach rechts verschieben, dass die Zielzelle immer direkt neben den Mitarbeitern zu sehen ist.
Das würde für eine deutlich bessere Übersicht sorgen.
Ich bin leider in dem Thema VBA noch nicht so tief drin, um das Problem selber zu lösen, deshalb würde ich mich freuen, wenn mir einer helfen würde und mir auch die Lösung erklären kann, damit ich diese nachvollziehen kann.
Danke im Vorraus!
Felix
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: SpinButton + Variable x-Achsen Scrollbar
26.11.2019 12:05:22
Torsten
Hallo Felix, fuer Spinbutton1 so:

Private Sub SpinButton1_Change()
If Not IsError(Range("C1")) Then Application.Goto reference:=Cells(12, Range("C1"))
ActiveWindow.ScrollColumn = ActiveCell.Column
SpinButton1.Min = 1
SpinButton1.Max = Range("A1").Value + 1
If SpinButton1 > Range("A1").Value Then MsgBox "Keine weiteren Fehler!"
End Sub

Gruss Torsten
Anzeige
AW: SpinButton + Variable x-Achsen Scrollbar
26.11.2019 13:21:34
Felix
Hallo Thorsten,
so einfach kann es gehen :).
Danke dir!
Grüße
Felix
gerne...
26.11.2019 13:24:12
Torsten
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18