ich wollte gerne eine dreispaltige Listbox in einer USERFORM erstellen. Die erste Spalte soll Datums aufnehmen(Quelle ist die Spalte a der Tabelle1). die zweite Spalte die dazugehörigen Uhrzeiten (aus Spalte b Tabelle1). Und die dritte Spalte die dazugehörigen Daten (Spalte c Tabelle1).
Ich weiß allerdings vorher nicht in welcher Höhe und wei Lang der Datenbereich ist.
Könnte z.B. von a20 - c35 je nach Eintragungen reichen
den Datenbereich habe ich deshalb vorher ermittelt mit
Dim a As Range
Set a = Range("a:a").Find(Beschreibung)
Dim anfang, ende As Variant
Dim Zeiger As Range
anfang = a.Row
ende = a.End(xlDown).Offset(-1,0).Row
set Zeiger = Range(cells(anfang, 1), cells(ende,3)).select
Nun weiß ich aber nicht wie ich das in eine dreispaltige Listbox reinbekomme
Habe noch mal das Beispiel unter:
https://www.herber.de/bbs/user/25419.xls
hochgeladen
Gruß Basti