Hallo,
Ich möchte einen Ordner durchlaufen, der Excel-Dateien enthält, und aus diesen Zellen auslesen.
Ich habe folgende Zeilen in meinem Code
Pfad = "\\.......\Datein\"
Fname = Dir(Pfad & "*.xlsm*")
Ich möchte nun auch andere Dateien mit anderen Endungen (z.B xlsb) zugreifen.
Wie kann ich das anstellen?
Mit der Verschatelung
Fname = Dir((Pfad & "*.xlsm*") Or (Pfad & ".xlsb"))
funktioniert es leider nicht...
Habt Ihr Ideen?
Grüße
Mirko
|