Ich habe folgendes Problem:
Über einen Makro werden aus einer Datei heraus drei andere Dateien geöffnet und anschließend Abfragen durchgeführt und die Ergebnisse in der Ausgangsdatei gespeichert.
Workbooks.Open Filename:= _"C:\....xls"
Workbooks.Open Filename:= _"C:\....xls"
Workbooks.Open Filename:= _ "C:\....xls"
Windows("Vorlage.xls").Activate
Range("A12").Select usw.
Das funktioniert auch solange, bis die Ausgangsdatei (im Beispiel Vorlage.xls) nicht unter einem anderen Namen gespeichert wird.
Ich suche also einen Weg, den Ausgangsdateinamen in einer Variablen zu speichern, so dass ich ihn anschließend über Windows(...).Activate (oder einen gleichwertigen Befehl) verwenden kann.
Mein Lösungsansatz:
Dim Dateiname As String
Dateiname = ActiveWorkbook.FullName
Workbooks(Dateiname).Activate
funktioniert leider nicht.
Vielen Dank im Voraus!
Frank