Listbox Auswahl in Zellen

[M.Wichmann]

Hallo,

ich möchte direkt in eine Tabelle eine Listbox(AktivX) einfügen, die mir mehrere Spalten einer Tabelle anzeigt (im Moment 2).

Kann man mit Linked Cell auch erreichen, das mir die Listbox  beide einträge in 2 Zellen einträgt?  Irgendwie geht das nicht.

[M.Wichmann]

Hat sich soweit erledigt.

Aber kann ich die Listbox auch in Listfillrange dynamisch befüllen?  Also das nur Zeilen anwählbar sind, die auch wirklich werte enthalten?

[schauan]

Hallöchen,

Wenn Du die Daten sortierst, wären zumindest zwischendrin keine leeren. Du könntest die Daten auch per Formel ohne Leere in einen anderen Bereich kopieren ...

[M.Wichmann]

Hallo Andre,

danke für die Antwort.
Aber ich meinte eigentlich, das ich nicht einen festen Bereich angebe( $A$!:$B$10), sondern ähnlich $A$1:$B.
Das die Listbox, bzw jetzt eine Kombobox dynamisch auf die Tabellenlänge reagiert, ohne das ich gegebenenfalls die Bereiche anpassen muss.

[Steffl]

Hallo Mario,

versuche es mal so

Code:

Dim lngC As Long

With ActiveSheet
   lngC = .Cells(.Rows.Count, 1).End(xlUp).Row
End With
ListBox1.ListFillRange = "A1:B" & lngC

[M.Wichmann]

Hallo, danke.

musste zwar etwas umstricken, da die Daten auf nem anderen Blatt sind, aber jetzt funktioniert es.

[schauan]

Hallo Mario,

ich dachte, Du hast leere Zeilen dazwischen und willst die weg haben.
Ansonsten geht eventuell auch ein Bezug auf einen benannten Bereich, den Du variabel hälst. Dann geht's auch ohne VBA