Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
388to392
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
388to392
388to392
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

ComboBox Initialisierung

ComboBox Initialisierung
24.02.2004 17:01:09
Steffen
Hallo!
Habe mit VBA bei Excel eine UserForm hinzugefügt und dort soll eine Combobox sein. Jetzt habe ich eine eingefügt und versucht die ComboBox mit Initilisierungswerten zu füllen. Kenne es von Visual C++ das man dort ComboBoxen direkt bei der Erstellung Defaultwerte mitgeben kann.
Kann mir jemand sagen wie man das mit VBA macht?
Thx steffen

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

Betreff
Datum
Anwender
Anzeige
AW: ComboBox Initialisierung
24.02.2004 17:11:23
lutz weinrich
hai,
wenn ich dich richtig verstanden habe willst du die combobox mit werten füllen die dann beim "aufklappen" ausgewählt werden können. Dazu musst du immer einen tabellenbereich definiren in dem deine gewünschten vorgabewerte stehen. genauen variablennamen in dem du den pfad angibst kann ich jetzt nicht sagen da an diesem pc kein excel drauf ist.
findest du aber leicht bei der hilfefunktion von vb (F1)
ciao lutz
AW: ComboBox Initialisierung
24.02.2004 17:11:44
Karl-Otto Reimann
Hallo Steffen
Hier ein Beispiel:

Private Sub UserForm_Initialize()
Dim i%
Dim TMP$
ComboBox1.Clear
For i = 1 To 12
TMP = Format(DateSerial(1998, i, 1), "mmmm")
ComboBox1.AddItem TMP
Next i
ComboBox1.ListIndex = 0
End Sub

Gruß
Karl-Otto
Anzeige
AW: ComboBox Initialisierung
24.02.2004 17:14:18
Harry
Hallo Steffen,
Du schreibst einfach in die entsprechende Ereignisprozedur, z.B.:
'*************** Dialog initialisieren ***************

Private Sub UserForm_Initialize()
Combobox1.Value = "Text"
End Sub

Gruß Harry
AW: ComboBox Initialisierung
24.02.2004 17:24:09
Alex K.
Hallo Steffen,
du kannst beim Laden des UserForm auf drei Arten die ComboBox füllen:

Private Sub UserForm_Initialize()
'1 Art
Me.ComboBox1.List = Array("1", "2", "3")
'2. Art, am besten dann in einer Schleife
Me.ComboBox1.AddItem "4"
Me.ComboBox1.Clear
'3. Art mit Werten aus einer Tabelle
Me.ComboBox1.RowSource = "Tabelle1!B1:B7"
End Sub

Die Eigenschaft "RowSource" kannst du auch zum Design-Zeitpunkt setzen.
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige