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

Alternative zu FileSearch

Forumthread: Alternative zu FileSearch

Alternative zu FileSearch
30.04.2007 22:44:51
Jonas
Hi Leute,
in Excel 2007 wird FileSearch nicht mehr unterstützt.
Ich suche daher eine Alternative:
Lies einen Ordner nach einem bestimmten Dateityp aus, z.B. *.txt
Grüße Jonas

Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Alternative zu FileSearch
30.04.2007 23:34:00
Oberschlumpf
Hi Jonas
Solange es sich nur um einen Ordner ohne Unterordner handelt, geht es so:

Sub DateiSuchen
Dim lstrFile As String
lstrFile = Dir("DeinPfad\*.txt")
Do Until lstrFile = ""
MsgBox lstrFile
lstrFile = Dir
Loop
End Sub


Dieses Makro meldet in einer Mesagebox alle txt-Dateien, die im von dir angegeben Verzeichnis gefunden wurden.
Konnte ich helfen?
Ciao
Thorsten

Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige