Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1636to1640
1636to1640
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Dropdown zurücksetzen

Forumthread: Dropdown zurücksetzen

Dropdown zurücksetzen
14.08.2018 09:18:10
Sebastian
Hallo,
vorweg: Ich habe schon einiges gesucht und gelesen, aber nichts wirklich passendes für mich gefunden.
Ich habe ich einer Exceldatei ein Dropdown Menu (ComboBox), über welches ich zu den einzelnen _ Seiten springen kann: 

Private Sub ComboBox1_Change()
Worksheets(ComboBox1.Value).Activate
End Sub

Und dort halt Buttons, über die ich wieder zurück zu "Sheet1" gelange: 

Sub Home()
Sheets("Sheet1").Select
End Sub
Nun möchte ich, dass das Dropdown Menu beim Öffnen der Datei sowie immer nach erfolgter Auswahl zurückgesetzt wird.
Entweder auf die erste Zeile des Datenbereiches (ListFillRange), oder auf einen frei wählbaren Text ("choose your game"). Je nachdem was da möglich ist.
Anzeige

17
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Bitte Beispielmappe mit Zielvorstellung ! (owT)
14.08.2018 09:29:48
EtoPHG

AW: Bitte Beispielmappe mit Zielvorstellung ! (owT)
14.08.2018 09:33:20
Werner
Hallo,
ins Codemodul von "DieseArbeitsmappe" 
Private Sub Workbook_Open()
Worksheets("Sheet1").ComboBox1.Value = "choose your game"
End Sub
zum Rückwechsel auf Sheet1: 
Sub Home()
With Worksheets("Sheet1")
.ComboBox1.Value = "choose your game"
.Activate
End With
End Sub
Gruß Werner
Anzeige
AW: Bitte Beispielmappe mit Zielvorstellung ! (owT)
14.08.2018 09:38:17
Sebastian
Das Dropdown Menu zeigt beim Öfnnen der Datei weiterhin das zuletzt ausgewählte an und geht jetzt gar nicht mehr (keine Reaktion),
beim "Home" Button erhalte ich Run Time Error 380 - Could not set the Value Property....
AW: Bitte Beispielmappe mit Zielvorstellung ! (owT)
14.08.2018 09:52:32
Werner
Hallo Sebastian,
wie schon geschrieben, dann lade mal deine Mappe hoch.
Gruß Werner
Anzeige
AW: Bitte Beispielmappe mit Zielvorstellung ! (owT)
14.08.2018 09:58:24
Sebastian
Die komplette Datei, oder was meint Ihr ?
ja. (owT)
14.08.2018 10:01:21
Werner
AW: ja. (owT)
14.08.2018 10:12:50
Sebastian
Wird mir nicht angezeigt.
Auch nicht wenn ich sie vorab in das C: Grundverzeichnis kopiere.
Anzeige
Code in Sheet1 ersetzen durch
14.08.2018 11:10:05
EtoPHG
Hallo Sebastian,
Option Explicit
Private Sub ComboBox1_Change()
Static FlipFlop As Boolean
With ComboBox1
If Not FlipFlop Then
FlipFlop = Not (FlipFlop)
Worksheets(ComboBox1.Value).Activate
ComboBox1.ListIndex = 0
FlipFlop = Not (FlipFlop)
End If
End With
End Sub
Setzt die Combobox auf den ersten Eintrag zurück!
Gruess Hansueli
Anzeige
AW: Code in Sheet1 ersetzen durch
14.08.2018 11:16:00
Sebastian
Perfekt, das läuft !
Danke, auf diesen Weg wäre ich alleine nicht gekommen.
Eine Frage noch zur Formatierung der DropDownbox (habe da schon einiges herumprobiert):
Wenn ich jetzt über den "Home" Button wieder auf Sheet1 wechsele und mir das DropDown Menu "choose your game" anzeigt, ist dieser Text "markiert", also grau hinterlegt.
Kann man das irgendwo deaktivieren, oder farblos setzen ?
Anzeige
Setze ComboBox1.ListIndex = 1 (owT)
14.08.2018 11:25:42
EtoPHG

AW: Setze ComboBox1.ListIndex = 1 (owT)
14.08.2018 12:11:31
Sebastian
Dann zeigt er nur ein Feld über dem was ich ausgewählt habe im Dropdown Menu an.
Bzw. gibt einen Fehler aus wenn ich zurück gehen will, da über "choose your game" ja nichts mehr steht bzw. die Range nur bis dort geht.
Grau hinterlegt ist der Text trotzdem noch.
WENN das geht, dann wohl über die Eigenschaften der Dropdown Box selbst. Dort kann ich ja auch die Hintergrundfarbe einstellen.
Aber ich weiß nicht wo.
Anzeige
in der Originalbeispielmappe fehlt...
14.08.2018 12:58:45
EtoPHG
dieses ominöse "choose your game", Sebastian,
Darum kann ich überhaupt nicht nachvollziehen, was du willst.
Schreib doch diesen Text über die Combobox und lass deren Inhalt in Frieden!
Das Gebastel mit Formatierungen und Farben, bringt dem Benutzer keine zusätzliche Funktionalität!
Gruess Hansueli
Anzeige
AW: in der Originalbeispielmappe fehlt...
14.08.2018 13:31:10
Sebastian
Auch wenn es drin steht passiert das.
Hat ja primär auch nichts mit der Formatierung / Markierung des Textes in der DropDown Box zu tun.
Selbst wenn ich das jetzt darüber schreibe...
Das "Gebastel" bringt durchaus etwas. Das Ganze soll ja nicht nur funktionieren sondern auch ansprechend sein.
Hätte ja sein können, dass jemand spontan weiß ob / wie das in den Einstellungen der Box geht (ohne VBA).
Danke trotzdem bis hierhin...
Anzeige
Jetzt verstehe ich, was du meinst
14.08.2018 14:06:38
EtoPHG
Sebastian,
...und nein. Das kannst du weder über VBA, noch über Formatierungen beeinflussen. Das ist Standardverhalten der Combobox.
Gruess Hansueli
sry, im falschen Zweig. o.w.T.
14.08.2018 09:36:44
Werner
AW: Bitte Beispielmappe mit Zielvorstellung ! (owT)
14.08.2018 09:39:06
Sebastian
Beispielmappe mit Zielvorstellung ?
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Dropdown in Excel zurücksetzen und verwalten

Schritt-für-Schritt-Anleitung

Um ein Dropdown-Menü in Excel zurückzusetzen, kannst du den folgenden VBA-Code verwenden. Dieser wird beim Öffnen der Arbeitsmappe und nach jeder Auswahl im Dropdown-Menü ausgeführt.

  1. Öffne deine Excel-Datei und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Doppelklicke auf "DieseArbeitsmappe" im Projekt-Explorer.

  3. Füge den folgenden Code ein:

    Private Sub Workbook_Open()
   Worksheets("Sheet1").ComboBox1.Value = "choose your game"
End Sub

Private Sub ComboBox1_Change()
   Worksheets(ComboBox1.Value).Activate
   ComboBox1.ListIndex = 0 ' Setzt die ComboBox auf den ersten Eintrag zurück
End Sub

  4. Schließe den VBA-Editor und speichere die Datei als Makro-fähige Arbeitsmappe (*.xlsm).

  5. Jetzt wird das Dropdown-Menü beim Öffnen der Datei zurückgesetzt.

Häufige Fehler und Lösungen

  • Fehler: Run Time Error 380 - Could not set the Value Property.

    • Lösung: Stelle sicher, dass die ComboBox1 tatsächlich auf "Sheet1" vorhanden ist und dass der Text "choose your game" korrekt eingegeben ist. Überprüfe die Schreibweise und die Position der ComboBox.

  • Das Dropdown-Menü bleibt bei der letzten Auswahl stehen.

    • Lösung: Stelle sicher, dass der Code im Workbook_Open korrekt implementiert ist. Es könnte hilfreich sein, die Datei zu schließen und erneut zu öffnen, um sicherzustellen, dass der Code ausgeführt wird.

Alternative Methoden

Wenn du kein VBA verwenden möchtest, kannst du die Dropdown-Liste manuell zurücksetzen, indem du das Dropdown-Menü öffnest und die erste Option manuell auswählst. Für eine schnellere Lösung kannst du die Tastenkombination ALT + ↓ verwenden, um das Dropdown-Menü zu öffnen.

Falls du eine Excel-Dropdown-Tastenkombination für das Öffnen von Dropdowns suchst, nutze ALT + F10, um das Dropdown sofort zu aktivieren.

Praktische Beispiele

  1. Ein einfaches Dropdown zurücksetzen:

    • Füge ein Dropdown-Menü (ComboBox) auf "Sheet1" hinzu.
    • Verwende den oben genannten VBA-Code, um die Auswahl beim Öffnen zurückzusetzen.

  2. Dropdown mit mehreren Blättern:

    • Erstelle eine Liste von Blattnamen im Dropdown und verwende die ComboBox, um zwischen den Blättern zu navigieren. Mit dem Code wird das Dropdown nach jeder Auswahl zurückgesetzt.

Tipps für Profis

  • Nutze die Excel Shortcut Dropdown öffnen-Funktion, um deine Arbeitsabläufe zu beschleunigen. Dies kann besonders nützlich sein, wenn du häufig zwischen verschiedenen Blättern wechselst.
  • Experimentiere mit den Eigenschaften der ComboBox, um das Erscheinungsbild zu optimieren. Du kannst Farben und Schriftarten anpassen, um ein besseres Benutzererlebnis zu schaffen.
  • Überlege, eine Tastenkombination für das Dropdown zu erstellen, die direkt zu bestimmten Funktionen oder Berichten führt.

FAQ: Häufige Fragen

1. Wie kann ich das Dropdown-Menü so einstellen, dass es beim Öffnen immer auf einen bestimmten Wert zurückgesetzt wird? Verwende den Workbook_Open-Event, um den gewünschten Wert festzulegen, wie im Schritt-für-Schritt-Abschnitt beschrieben.

2. Kann ich die Dropdown-Liste ohne VBA zurücksetzen? Ja, du kannst die Auswahl manuell zurücksetzen, indem du das Dropdown öffnest und die erste Option auswählst.

3. Gibt es eine Möglichkeit, die Markierung des Dropdown-Textes zu entfernen? Leider ist dies ein Standardverhalten der ComboBox, und du kannst es nicht über VBA oder Formatierungen ändern.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige