Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Daten in Listenfeld schreiben

Daten in Listenfeld schreiben
17.06.2005 10:07:05
Fuger
Guten Morgen!
Ich habe folgenden Code:

Sub Suchen
With Application.FileSearch
.LookIn = "c:\Leitz Anwendungen\Kaindl\Gelieferte Positionen"
.FileType = msoFileTypeExcelWorkbooks
.Execute()
End Sub

Wie kann ich das Ergebnis in einem Listenfeld anzeigen?
Bitte um Hilfe
Danke
Gerhard
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Daten in Listenfeld schreiben
17.06.2005 21:50:24
MichaV
Hallo
so z.B.:

Option Explicit
Sub Suchen()
Dim i As Integer
With Application.FileSearch
.LookIn = "d:\spiele\max\"
.FileType = msoFileTypeExcelWorkbooks
.Execute
For i = 1 To .FoundFiles.Count
ListBox1.AddItem .FoundFiles(i)
Next
End With
End Sub

Gruß- Micha
PS: Rückmeldung wäre nett.
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige