Beispiel:
With UserForm1.LBoxNamen
.ColumnCount = 2
.ColumnHeads = True
For Count = 0 to RecNbr -1
.AddItem
.List(Count,0 = Range("A" & Trim(CStr(Count+2)))
.List(Count,1 = Range("B" & Trim(CStr(Count+2)))
Next
End With
cu Jürgen
--
Email: jed...@t-online.de
PGP-Key available
---
verwende einfach die Value-Eigenschaft der Combobox:
z.B. ComboBox1.Value = ComboBox1.List(0)
Gruß
Holger
http:\\ewf.here.de
Hallo Jürgen,
folgende Annahme:
Spalte A Spalte B
1 Vorname Nachname
2 Peter Klotz
3 Susi Meyer
...
dann darf die Spaltenüberschrift nicht im Listbereich des Listfeldes
mit einbezogen werden, RowSource wäre also im obigen Beispiel A2:Bx.
MfG Frank
---
E-Mail: Thei...@t-online.de
---
>Ich fülle in einem Formular eine Listbox per VBA mit Daten, ohne
>diese mit einem Formularbereich zu verbinden. Nun suche ich
>einen Weg die Kopzeile mit Inhalt zu füllen. Scheinbar existiert
>jedoch bei dieser Art der Listbox-Füllung keine Möglichkeit
>diese zu verwenden.
>Weiß jemand Rat oder kann ich die Kopfzeile vergessen?
Hi Jürgen,
im Gegensatz zu Holger und Frank denke ich daß Du das mit der
Kopfzeile vergessen kannst. Ich habe auch schon nach einer Lösung
gesucht, da ich regelmäßig List- oder Comboboxen mit
Abfrageergebnissen aus Access fülle. Leider bin ich nicht fündig
geworden.
Franks Lösung greift nicht, da, wenn ich Dich richtig verstanden habe,
Du keinen Tabellenbereich mit der lb verbunden hast. Holgers Lösung
markiert den ersten Eintrag der Liste, macht sie aber nicht zur
Kopfzeile.
Oder habe ich mal wieder nicht richtig gelesen?
Gute Nacht,
Roger
--
*Vote against Spam - Stimm gegen Spam*
Mehr dazu unter:
http://www.heise.de/ct/99/05/022/
http://www.politik-digital.de/spam/de/