Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Combobox zurücksetzen

Combobox zurücksetzen
05.08.2008 13:41:00
CARL
Moin moin mal wieder!
ich hab noch mal eine kleinigkeit, ich habe diese Frage schon an andere Stelle im Forum gestellt, hab aber noch keine Lösung gefunden
Ich würde gerne meine Combobox "leeren" sobald ich einen Button betätige
Nepumuk hat mir diesen Code genannt, aber ich komme damit nicht zurecht.

Public Sub test()
Tabelle1.ComboBox1.ListIndex = -1
End Sub


so hab ich versucht die Codezeile in eines meiner Makros zu integrieren...


Private Sub reset_filter_Click()
' Delete all Filter
If Sheets("daten").FilterMode Then Sheets("daten").ShowAllData
Sheets("market TOTAL").ComboBox_engine_type_Change.ListIndex = -1
End Sub
dann kommt die meldung


laufzeitfehler'438'
objekt unterstützt diese Eigenschaft oder Methode nicht



liegt das an meienm Syntax, oder mach ich das generell falsch?
vielen lieben dank,
Gruß
Carl!

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Combobox zurücksetzen
05.08.2008 14:42:12
Daniel
Hi
prinzipiell funktioniert das mit dem Listindex = -1 schon
probier mal mit .Value = "" den Wert zurückzusetzen,
ansonsten lad mal deine Datei hoch, Fehlerursachen müssen nicht immer nur im Programmcode liegen.
Gruß, Daniel

AW: Combobox zurücksetzen
11.08.2008 07:57:00
CARL
Hi! und vielen Dank!
so hab ich es gelößt!

Sheets("market total").ComboBox_engine_type.Value = ""


Danke!

Anzeige
Anzeige

Infobox / Tutorial

Combobox in Excel zurücksetzen


Schritt-für-Schritt-Anleitung

Um eine Combobox in Excel zurückzusetzen, kannst du den folgenden VBA-Code verwenden. Dieser wird ausgeführt, wenn du auf einen Button klickst:

  1. Öffne das VBA-Editor-Fenster (ALT + F11).
  2. Füge ein neues Modul hinzu.
  3. Kopiere den folgenden Code in das Modul:
Public Sub reset_combobox()
    Sheets("market total").ComboBox_engine_type.Value = ""
End Sub
  1. Erstelle einen Button in deinem Excel-Blatt.
  2. Weise dem Button das Makro reset_combobox zu.
  3. Schließe den VBA-Editor und teste den Button.

Jetzt sollte die Combobox zurückgesetzt werden, wenn du den Button betätigst.


Häufige Fehler und Lösungen

  • Laufzeitfehler '438': Dieser Fehler tritt auf, wenn die angegebene Eigenschaft oder Methode nicht unterstützt wird. Stelle sicher, dass der Name deiner Combobox korrekt ist und dass du auf das richtige Blatt zugreifst. Überprüfe auch, ob die Combobox tatsächlich auf dem Arbeitsblatt vorhanden ist.

  • Combobox wird nicht geleert: Wenn der Code nicht funktioniert, könnte es an der Art liegen, wie die Combobox konfiguriert ist. Versuche, den Wert auf "" zu setzen, wie im Beitrag von Daniel vorgeschlagen:

Sheets("market total").ComboBox_engine_type.Value = ""

Alternative Methoden

Falls du keine VBA-Lösung verwenden möchtest, könntest du auch eine einfache Excel-Formel nutzen, um die Auswahl in der Combobox zu beeinflussen. Dies funktioniert jedoch nur in sehr spezifischen Fällen und ist nicht so flexibel wie VBA.


Praktische Beispiele

Hier ist ein Beispiel, wie du den Reset der Combobox mit einem Button verknüpfen kannst:

Private Sub reset_filter_Click()
    ' Alle Filter löschen
    If Sheets("daten").FilterMode Then Sheets("daten").ShowAllData
    ' Combobox zurücksetzen
    Sheets("market total").ComboBox_engine_type.Value = ""
End Sub

Dieses Makro sorgt dafür, dass beim Klicken auf den Button sowohl alle Filter zurückgesetzt als auch die Combobox geleert wird.


Tipps für Profis

  • Nutze die .ListIndex-Eigenschaft, um die Auswahl in der Combobox zu ändern. Der Wert -1 bedeutet, dass keine Auswahl getroffen ist:
Sheets("market total").ComboBox_engine_type.ListIndex = -1
  • Überprüfe immer die Namen deiner Steuerelemente in der Entwurfsansicht, um sicherzustellen, dass du auf das richtige Element zugreifst.

FAQ: Häufige Fragen

1. Wie kann ich mehrere Comboboxen gleichzeitig zurücksetzen?
Du kannst einfach mehrere Zeilen im Makro hinzufügen, um jede Combobox separat zurückzusetzen:

Sheets("market total").ComboBox1.Value = ""
Sheets("market total").ComboBox2.Value = ""

2. Funktioniert das in allen Excel-Versionen?
Die oben genannten Methoden funktionieren in den meisten modernen Excel-Versionen, die VBA unterstützen, wie Excel 2013, 2016, 2019 und Microsoft 365.

Beliebteste Forumthreads (12 Monate)

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