Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
408to412
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
408to412
408to412
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

HILFE: Dateinamen auslesen

HILFE: Dateinamen auslesen
RON
Hallo,
es gibt ja schon einige Beitraege, wie man dateinamen aus EINEM Order auslesen kann. Allerdings existierenen in meinem Fall weitere Unterordner mit Dateien aus denen die Filenamen ausgelesen werden sollen. Wer kann helfen? Gern als VBA, will ja lernen ;-)

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: HILFE: Dateinamen auslesen
Ulf
Aus der Hilfe, die du bestimmt auch hast?
Set fs = Application.FileSearch
With fs
.LookIn = "C:\My Documents"
.SearchSubFolders = True
.FileName = "cmd*"
If .Execute() &gt 0 Then
MsgBox "There were " & .FoundFiles.Count & _
" file(s) found."
For i = 1 To .FoundFiles.Count
MsgBox .FoundFiles(i)
Next i
Else
MsgBox "There were no files found."
End If
End With
Ulf
AW: HILFE: Dateinamen auslesen
07.04.2004 18:20:44
Ron
Ulf, jetzt bekomme ich die Dateinamen einzeln in einer messagebox angezeigt.
Gewollt ist aber, dass alle Dateinamen und Ordnernamen im aktuellen Tabellblatt
untereinander geschrieben werden (Zeile fuer Zeile)...
Danke Dir im voraus!!!!!!!!
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige