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

Dateien in Pfad suchen und nacheinander öffnen

Forumthread: Dateien in Pfad suchen und nacheinander öffnen

Dateien in Pfad suchen und nacheinander öffnen
28.07.2014 11:36:43
Robin
Hallo Leute,
ich habe ein Programm geschrieben, wo manuell Dateien geöffnet und dann Daten importiert werden.
Nun will ich das Öffnen und Verarbeiten automatisieren.
Im Quellpfad soll nach Dateien mit dem Namensinhalt *Benutzer* gesucht werden.
Dann sollen alle Dateien nacheinander mit einer for oder while Schleife geöffnet werden.
Könnt Ihr mir eine mögliche Lösung des Problems zeigen?
Vielen Dank und liebe Grüße
Robin

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Dateien in Pfad suchen und nacheinander öffnen
28.07.2014 12:20:20
Rudi
Hallo,
ich weiß nicht, wie oft das schon gefragt wurde.
sub aaaaa()
dim sPfad as string, sFile as String, wkb as workbook
sPfad="c:\test\"
sFile=dir(sPfad &"*benutzer*")
do while sFile  ""
set wkb=workbooks.open (sPfad & sFile)
'mach was
wkb.close false
sFile= Dir
Loop
end sub

Gruß
Rudi

Anzeige
AW: Dateien in Pfad suchen und nacheinander öffnen
28.07.2014 13:09:01
Robin
Sehr geil vielen Dank :)

Forumthreads zu verwandten Themen

Anzeige