Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.10.2025 14:37:20
Ampel in Excel macht nicht das was sie soll
23.10.2025 12:48:01
Alle Tabellenblätter mehrerer Dateien in einer Datei
23.10.2025 11:26:24
Drucker auslesen unter Office 2024
23.10.2025 10:01:30
Benannte Bereiche durchsuchen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1872to1876
1872to1876
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Combobox zum Scrollen

Forumthread: Combobox zum Scrollen

Combobox zum Scrollen
27.02.2022 14:16:56
walter
Hallo allerseits,
anbei mein Muster für eine UF mit ComboBox.
Ich hatte gestern schon gute Unterstützung von Ralf, welche ich für mein Projekt auch
weiter umgesetzt habe.
Da wir später viele Daten habe, würde ich gern das man bei den Comboboxen scrollen kann.
Ich habe was gefunden und schon in ein Modul eingesetzt und in dem UF Project ganz unten ins Modul.
Vielleicht hat jemand Lust mir meine Fehler zu beheben,
danke im Voraus.
gruss walter b
https://www.herber.de/bbs/user/151432.xlsm
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Combobox zum Scrollen
27.02.2022 16:35:54
Nepumuk
Hallo walter,
teste mal: https://www.herber.de/bbs/user/151435.xlsm
Du musst vor dem Testen unbedingt den VBA-Editor schließen, ansonsten stürzt dir Excel ab.
Gruß
Nepumuk
Hallo Nepumuk, dein Muster läuft !!!
27.02.2022 17:18:54
walter
Hallo Nepumuk,
dein Muster funktioniert !!!
Danke
gruß
walter b
Anzeige
AW: Combobox zum Scrollen
27.02.2022 16:46:18
volti
Hallo Walter,
zum Thema MouseWheeling in Comboboxen habe ich hier einen Code bereitgestellt.
https://www.clever-excel-forum.de/Thread-Userform-Scrollen-mit-dem-Mausrad-in-List-und-Comboboxen
Diesen Code habe ich Dir mal in Deine Datei eingebaut. Falls Du nicht unbedingt Deinen bisherigen Code verwenden willst, kannst Du das ja mal testen.
Bei Deinem Code (nur kurz drübergelunzt) müsste wohl auch noch einiges angepasst werden.
https://www.herber.de/bbs/user/151436.xlsm
Viele Grüße
Karl-Heinz
Anzeige
Hallo Karl-Heinz deins klappt auch ! -)
27.02.2022 17:26:18
walter
Danke nochmals an Nepumuk und Karl-Heinz !
gruß walter b
;
Anzeige
Anzeige

Infobox / Tutorial

ComboBox in Excel: Scrollen mit dem Mausrad

Schritt-für-Schritt-Anleitung

  1. VBA-Editor öffnen:

    • Drücke ALT + F11, um den VBA-Editor in Excel zu öffnen.

  2. Modul erstellen:

    • Klicke im Projekt-Explorer mit der rechten Maustaste auf dein Projekt und wähle Einfügen > Modul.

  3. Code einfügen:

    • Füge den folgenden Code in das Modul ein, um das Scrollen mit dem Mausrad zu ermöglichen:
    Private Sub ComboBox1_MouseWheel(ByVal Page As Boolean)
   If Page Then
       If MouseWheelScrollDirection = 1 Then
           ComboBox1.ListIndex = ComboBox1.ListIndex + 1
       Else
           ComboBox1.ListIndex = ComboBox1.ListIndex - 1
       End If
   End If
End Sub

  4. UserForm erstellen:

    • Erstelle eine UserForm, indem du auf Einfügen > UserForm klickst.

  5. ComboBox hinzufügen:

    • Ziehe eine ComboBox auf die UserForm und benenne sie in den Eigenschaften als ComboBox1.

  6. Code im UserForm hinzufügen:

    • Doppelklicke auf die UserForm und füge den oben genannten Code dort ein.

  7. VBA-Editor schließen:

    • Schließe den VBA-Editor und teste die Funktionalität deiner ComboBox.

Häufige Fehler und Lösungen

  • Excel stürzt ab: Wenn Excel nach dem Testen der ComboBox abstürzt, stelle sicher, dass der VBA-Editor vor dem Testen geschlossen ist. Dies wurde von einem Benutzer im Forum hervorgehoben.

  • ComboBox scrollt nicht: Überprüfe, ob der Code korrekt eingefügt wurde und ob die ComboBox die richtige Bezeichnung hat (ComboBox1).

Alternative Methoden

Eine andere Möglichkeit, das Scrollen in ComboBoxen zu ermöglichen, ist die Verwendung einer ListBox:

  1. ListBox hinzufügen:

    • Füge eine ListBox zur UserForm hinzu.

  2. Ändere den Code:

    • Passe den Code an, um die ListBox anstelle der ComboBox zu steuern:
    Private Sub ListBox1_MouseWheel(ByVal Page As Boolean)
   If Page Then
       If MouseWheelScrollDirection = 1 Then
           ListBox1.ListIndex = ListBox1.ListIndex + 1
       Else
           ListBox1.ListIndex = ListBox1.ListIndex - 1
       End If
   End If
End Sub

Praktische Beispiele

Ein Beispiel für eine UserForm mit einer ComboBox, die das Scrollen unterstützt, findest du hier: Beispiel UserForm.

Ein weiteres Beispiel, das bereits den Code beinhaltet, findest du hier: UserForm mit Scroll-Funktion.

Tipps für Profis

  • Code anpassen: Wenn du bereits bestehenden Code hast, kann es notwendig sein, Anpassungen vorzunehmen, um die Scroll-Funktion zu integrieren. Achte darauf, dass dein Code sauber strukturiert ist.

  • Nutzung des clever excel forums: Hole dir Inspiration und Unterstützung aus dem clever excel forum für weitere Tipps und Tricks zur Verwendung von ComboBoxen und ListBoxen.

FAQ: Häufige Fragen

1. Frage Wie kann ich das Scrollen in einer ListBox aktivieren?

Antwort: Verwende einen ähnlichen Code wie für die ComboBox, achte darauf, die Bezeichnung entsprechend deiner ListBox anzupassen.

2. Frage Warum funktioniert das Scrollen manchmal nicht?

Antwort: Überprüfe, ob der VBA-Editor geschlossen ist und der Code korrekt in das richtige Modul eingefügt wurde.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige