A97:Listenfeld füllen

Hallo!
Ich möchte ein Listenfeld mit den Dateien eines bestimmten Ordner füllen.

Mit der Dir Funktion schreibe ich den Inhalt es Ordners in eine Variable.
Dateien = Dir(pfad )
Anschließend
Do While Dateien „“
Dateien = Dir
loop
Mit “debug.print Dateien“ bekomme ich alles korrekt im Testfenster aufgelistet.
Wie bekomme ich die komplette Liste in ein Listenfeld?
Vielen Dank im Voraus
Gruß, Georg

Ich möchte ein Listenfeld mit den Dateien
eines bestimmten Ordner füllen.

Hi Georg!
Am sinnvollsten wäre es sicher, die Dateinnamen in einer kleinen temporären Tabelle abzulegen.

Es geht aber auch so:
Stelle das Listenfeld auf den Herkunftstyp Wertliste ein und baue die Dateinnamen zu einem String nach dem Muster
Dateien = „‚Name1‘;‚Name2‘;‚NameX‘“
zusammen.

Dann dem Listenfeld zuweisen mit:
Forms!MeinFormular![MeinListenfeld].RowSource = Dateien

Müsste klappen (habs aber nicht getestet):smile:
Claudio

Hi,

Wie bekomme ich die komplette Liste in
ein Listenfeld?

Mit der Methode ListenfeldName.AddItem innerhalb der Schleife.
Gibt es aber nicht einen Common Control speziell für diese Anwendung?

Gruß
J.