Ich möchte via makro eine bestimmte excel-datei suchen und diese dann automatisch öffnen.
Weiß jemand hilfe?
Danke
Max
Sub erwartet" erscheint jedes mal.
Was mach ich falsch?
Danke
Max
Sub Siehnach()
Dim File$, Pfad$, Datei$
Pfad = "C:\eigene Dateien\"
Datei = "Mappe1.xls"
File = Dir(Pfad & Datei) 'ist leer wenn Datei im VZ fehlt
If Len(File) > 0 Then
Workbooks.Open Filename:=File
'mach was damit
Workbooks(File).Close
End If
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen