Microsoft Office Tutorials and References
In Depth Information
2.2.10 Pfad einer Arbeitsmappe ermitteln
MsgBox "Diese Mappe ist in " & ThisWorkbook.Path
Workbooks.Open ThisWorkbook.Path & "\Mappe1.xlsm"
Workbooks.Open ThisWorkbook.Path & "\Zusatz\Test.xlsx"
MsgBox "Test ist in " & ActiveWorkbook.Path
End Sub
Zur Erläuterung:
Zunächst wird die Arbeitsmappe C:\Temp\Mappe3.xlsm geöffnet.
Dies ist jetzt die aktive Arbeitsmappe.
Abbildung 2.9
Pfad der Mappe »Mappe3«
Anschließend wird mit Hilfe der Eigenschaft Path der Pfad zu dieser
Arbeitsmappe ausgegeben, in der sich die oben angegebene Prozedur
PfadErmitteln() befindet.
Path
Abbildung 2.10
Pfad von »dieser« Mappe
Es wird die Arbeitsmappe Mappe1.xlsm geöffnet. Diese steht im glei-
chen Verzeichnis wie diese Arbeitsmappe, in der sich die oben ange-
gebene Prozedur PfadErmitteln() befindet. Dies wird häufig benö-
tigt, um sicher zu sein, dass eine Datei im gleichen Verzeichnis
geöffnet wird.
Zuletzt wird die Arbeitsmappe Test.xlsx geöffnet. Diese steht im
Unterverzeichnis Zusatz des Verzeichnisses dieser Arbeitsmappe. Die
soeben geöffnete Arbeitsmappe ist jetzt aktiv.
Hinweis
In den Versionen vor Excel 2007 müssen die Dateibezeichnungen in den
entsprechenden Zeilen der Prozedur und in der Erläuterung wie folgt lauten:
Mappe3.xls , Mappe1.xls und Test.xls .
Search JabSto ::




Custom Search