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

Erstes Element einer Combobox

Forumthread: Erstes Element einer Combobox

Erstes Element einer Combobox
21.08.2002 14:46:22
Karl
Hallo Freaks,

nach der Initialisierung einer Combobox meiner Userform
mit Userform.ComboBox.Rowsource = NameWorksheet.Range
("A1:A10").address aus einem Makro heraus möchte
ich, dass ein beliebiges Element des Zellbezugs als erstes
Element der Combobox erscheint.
Die Anweisung Userform.ComboBox.TopIndex = 0 (oder irgend
ein anderer Index > 0) führt jedoch nicht zum
gewünschten Ergebnis. Excel betrachtet die Combobox als leer,
auch nach dem Aufruf des Formulars das die Combobox enthält.
Excel läßt nur den Index -1 für leere Listen zu.

Danke im voraus für Eure Hilfe.

Yours
Karl


Anzeige

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

Betreff
Datum
Anwender
Anzeige
Re: Erstes Element einer Combobox
21.08.2002 14:56:30
Charlie
Hallo Karl,

das liegt an der Zuweisung der RowSource-Eigenschaft. So sollte es funktionieren:

Viel Erfolg,
Charlie

Re: Erstes Element einer Combobox
21.08.2002 14:57:10
mathias r.
Nicht Topindex sonder Listindex nehmen:

Me.ComboBox1.ListIndex = 3

Re: Erstes Element einer Combobox
21.08.2002 15:17:34
Karl
Danke für den Hinweis - ListIndex ist goldrichtig.

Gruß Karl

Anzeige
;
Anzeige

Infobox / Tutorial

Erstes Element einer Combobox in Excel festlegen


Schritt-für-Schritt-Anleitung

Um das erste Element einer Combobox in Excel festzulegen, folge diesen Schritten:

  1. Öffne die Userform: Stelle sicher, dass du im VBA-Editor bist und deine Userform geöffnet ist.

  2. Setze die RowSource: Weise der Combobox eine Datenquelle zu, indem du den folgenden Code verwendest:

    Userform.ComboBox1.RowSource = "NameWorksheet!A1:A10"
  3. Setze den ListIndex: Um das erste Element der Combobox auszuwählen, verwende die ListIndex-Eigenschaft:

    Userform.ComboBox1.ListIndex = 0

    Dies stellt sicher, dass das erste Element angezeigt wird, sobald die Userform geöffnet wird.

  4. Öffne die Userform: Stelle sicher, dass die Userform korrekt geladen wird, damit die Änderungen sichtbar sind.


Häufige Fehler und Lösungen

  • Fehler: Combobox bleibt leer
    Wenn die Combobox leer bleibt, überprüfe die Zuweisung der RowSource. Stelle sicher, dass der Zellbezug korrekt ist und dass die Daten im angegebenen Bereich tatsächlich vorhanden sind.

  • Fehler: ListIndex funktioniert nicht
    Wenn ListIndex nicht funktioniert, überprüfe, ob du die richtige Indexnummer verwendest. Beachte, dass die Indizes bei 0 beginnen.


Alternative Methoden

Wenn du Schwierigkeiten mit der Standardmethode hast, kannst du auch eine alternative Methode in Betracht ziehen:

  • Direkte Zuweisung der Werte: Anstatt RowSource zu verwenden, kannst du die Werte direkt in die Combobox einfügen:
    With Userform.ComboBox1
       .AddItem "Element 1"
       .AddItem "Element 2"
       .AddItem "Element 3"
       .ListIndex = 0 ' Setzt das erste Element
    End With

Praktische Beispiele

Hier sind einige Beispiele, die dir helfen könnten:

  • Beispiel mit einem Makro:

    Sub InitializeComboBox()
       With Userform.ComboBox1
           .RowSource = "NameWorksheet!A1:A10"
           .ListIndex = 0 ' Zeigt das erste Element an
       End With
       Userform.Show
    End Sub
  • Benutzerdefinierte Werte:

    Sub CustomComboBox()
       With Userform.ComboBox1
           .AddItem "Apfel"
           .AddItem "Banane"
           .AddItem "Kirsche"
           .ListIndex = 0 ' Wählt "Apfel" aus
       End With
       Userform.Show
    End Sub

Tipps für Profis

  • Verwendung von ListIndex statt TopIndex: Achte darauf, ListIndex zu verwenden, um ein Element auszuwählen. TopIndex hingegen wird verwendet, um den ersten sichtbaren Index in der Liste anzugeben.

  • Datenvalidierung: Überprüfe, ob die Daten in der angegebenen Range korrekt formatiert sind, um Probleme mit der Combobox zu vermeiden.


FAQ: Häufige Fragen

1. Warum bleibt die Combobox leer, obwohl ich die RowSource gesetzt habe?
Das kann passieren, wenn der Zellbereich, den du angegeben hast, leer ist oder die Referenz falsch ist. Überprüfe den Zellbereich auf korrekte Werte.

2. Wie kann ich mehrere Items in die Combobox einfügen?
Du kannst die Methode AddItem verwenden, um mehrere Items manuell hinzuzufügen. Alternativ kannst du auch eine RowSource setzen, die auf einen Bereich mit mehreren Werten verweist.

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