online 1
gast (50)

/ Forum / Tabellenkalkulation

TabellenkalkulationTabellenkalkulation

Fragevon BerndH vom 11.08.2022, 14:03 Options

Application.FileSearch in VBA 2007

Hallo,
suche Untestützung. Mein Vorgänger hat mit Excel 2003 die VBA-Makros geschrieben und alles funktioniert unter 2003 perfekt.
Ich arbeite neuerdings mit Excel 2007 (Umstellung in ganzer Fa.)
Ich habe bemerkt, dass seine Programme mit "Application.FileSearch" in VBA 2007 immer zu Fehlern führen. (Befehl ist wohl gestrichen worden)
Welche Alternativen gibt es da?
Es handelt sich um mehrere Programme, die immer die gleichen Such-Befehle enthalten.
Im konkreten Fall möchte ich aus einem beliebigen Verzeichnis alle Ordner, Unterordner und Dateien mit zB. xls.-Endung auflisten. Dazu verwendete mein Vorgänger folgende Such-Abfrage:


With Application.FileSearch
.NewSearch
.LookIn = strPfad
.Filename = strErweiterung
.SearchSubFolders = blnMsg
.Execute
lngCount = .FoundFiles.Count

Das Ergebnis sah dann in diesem Fall aus.

Stücklisten
Stl_Acco_USA
Stl_Acco_USA.xls

Stl_Acco_USA_Formel (mech).xls

Stl_Acco_USA_Formel (pneu).xls

Stl_Audi
Stl_Audi_Formel (mech) von Catia.xls

Stl_Audi_Formel (mech).xls‎

Stl_Audi_Formel (pneu).xls

Stl_DC_Formel (pneu).xls


Ordner, Unterordner und Dateien werden aufgelistet.

Wie muß der Code für diese Suche unter excel 2007 sein?

Wer kann Hinweise geben.

Gruß Bernd


Antwort schreiben

Antwort 1 von Hajo_Zi vom 11.08.2022, 16:11 Options

Hallo Bernd,

die Funktion gibt es ab 2007 nicht mehr.
Ordnersuche ab 2007 Link zur Datei

Gruß Hajo

Ähnliche Themen

Filesearch unter Excel 2007
morpheus__85  09.10.2009 - 639 Hits - 7 Antworten

alternative für Application.FileSearch
xxl83  20.10.2009 - 387 Hits - 7 Antworten

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Mon Jan 26 07:32:25 2026