Office: Listbox mit Daten füllen

Hallo

Ich habe mir in VBA ein kleines Userform mit einer Listbox und einem Button "gebaut".
Wie bekomme ich jetzt Daten in die Listbox? Die Daten müssen nicht Dynamisch sein, da es immer die selben bleiben werden.
Habe auch schon gegoogelt aber finde nur Tutorials über das Auslesen aus einer Listbox

Danke für eure Hilfe!

Gruss
Pocko

:)

 

Hallo Pocko,

habe ich gerade frisch selbst herausgefunden, da ich zur Zeit eine ComboBox befüllen möchte. Das sollte bei der ListBox allerdings analog funktionieren.

Dazu mußt Du den Code beim Object "Userform" beim Ereignis "Initialize" positionieren.

Code:

Ich hoffe, dass hilft Dir weiter.

Gruss Masel

 

Hallo Masel

Danke für deine Antwort, nur wo muss ich das platzieren?
Hier mein Code:

Code:

Wenn ich das so laufen lassen will bekomme ich die Fehlermeldung "Object required" also kann das irgendwie nicht stimmen *wink.gif*

Gruss
Pocko

 

Moin Pocko,

heißt Deine UserForm tatsächlich UserForm oder hast Du die umbenannt? Das musst Du im Code dann entsprechend ändern.

Genauso muss Deine ListBox1 auch ListBox1 heissen, sonst bekommst Du die Fehlermeldung Object required.

Gruss von Masel

 

Hallo Masel

Ok hab das Problem gefunden, die Userform hies Userform1 *wink.gif*
Funktioniert jetzt einwandfrei!
Vielen dank für deine schnelle Hilfe! *Smilie

Gruss
Pocko

 

Moinsen

Nochmals ich *Smilie

Habe mir eine kleine Suchfunktion gebaut:

Code:

Nun habe ich herausgefunden, dass ich über rng.Address die Stelle des Eintrages anzeigen kann.
Jedoch brauche ich nur den Zahlenwert nicht aber den Buchstaben, also wenn ich das als Stelle zurückbekomme:

Code:

brauche ich nur
Code:

Gibts eine Möglichkeit das Abzuspalten?

MfG
Pocko

 

hi,
du bekommst die spalte mit
rng.column
und die zeile mit
rng.row
cu Micha

 

Tach Pocko

Das geht so:
Range("A1") = Mid(ActiveCell.Address, 3, 2)

Beziehungsweise halt nicht activecell, sondern die variable wo du die Adresse schon abgelegt hast. Und was du damit machen willst, weiß ich auch nicht so genau. Hier wird der Wert halt in A1 geschrieben (evtl. Zellen-Format auf "Text" stellen, sonst bekomm ich jedenfalls € statt $).

Ist aber eigentlich eher "Aufspalten eines Textstrings" als "Füllen einer Listbox" *wink.gif*

 

Danke euch beiden, hat beides geklappt *Smilie

Jo ich weiss, wollte aber keinen neuen Thread aufmachen *wink.gif*
Bin selber Admin in einem grossen Forum und weiss wie stressig das sein kann :P