VBA ListBox RowSource per Code befüllen

[OoDex]

Guten Tag,

bin gerade am Verzweifeln. Über den Namensmanager vergebe ich einem Bereich einen Namen, sagen wir "Peter". Gehe ich nun in die Listbox-Eigenschaften kann ich dort bei RowSource =Peter schreiben und er lädt die Liste. Nun möchte ich diese ändern, wenn jemand was anderes auswählt, per Code. 
"Listbox1.RowSource = Lisa" funktioniert nicht, ich könnte schwören das ging rein mit dem Namen der im Namen Manager vergeben wurde.

[Klaus-Dieter]

Hallo,

das geht auch, wie hast du das denn versucht?

[OoDex]

Code:

If (LB_Standorte.Selected(1) = True) Then
    LBX_Abteilung.RowSource = Dornstadt_Abteilung
End If

Er bringt zwar keine Error-Meldung, allerdings bleibt die Listbox leer.
Wenn ich vorab RowSource auf "=Dornstadt_Abteilung" setze, dann klappt es wunderbar und lädt die Liste :/

Edit: Bin für alle Anregungen offen, ich war mir 100% sicher ich hatte es so oder so ähnlich immer gemacht und nun bleibt das Fenster leer, falls es so klappen sollte sagt das bitte auch, vllt gibt es nur bei mir ein Problem...

Lösung: Einfach die Liste in Anführungszeichen schrieben "Dornstadt_Abteilung" statt Dornstadt_Abteilung

[Frogger1986]

Code:

Listbox1.RowSource = "Lisa"

versuchs ma so..

[snb]

Verzichte immer auf 'rowsource':  http://www.snb-vba.eu/VBA_Fill_combobox_listbox_en.html

[schauan]

@snb

Verzichte immer auf 'rowsource':

sag niemals nie

[Kuwer]

Hallo,

so sollte es gehen:

LBX_Abteilung.RowSource = Names("Dornstadt_Abteilung").RefersTo

Gruß Uwe

[snb]

Einfach so:

Code:

Listbox1.List = [Lisa].value