Guten Morgen liebe Leute,
Gibt is einen einfachen Befehl, der mit schaut aus welchem Ausgangsordner meine-Excel Datei geöffnet WURDE? Das Workbook wird zuvor per makro aus einem anderen Workbook geöffnet. Ich wollte erreichen, dass wenn die Datei des 2. Workbooks z.B. vom Desktop aus geöffnet wird, eine Messagebox erscheint, und falls nicht (also aus irgend einem anderen Verzeichnis) soll keine Messagebox auftauchen. Hier meine ersten Versuche, die in einem Fehler resultieren:
--------------------------------------------------------
Sub Start
Workbooks.Open "C:\Benutzer\Desktop\Excel1.xlsm" '1.Workbook öffnet hier 2.Workbook
End Sub
-------------------------------------------------------
-------------------------------------------------------
Sub check()
If Application.ActiveWorkbook.Path("C:\Benutzer\Desktop") Then '2.Workbook soll gucken, ob es vom Desktop aus geöffnet wurde
MsgBox ("hello world")
Else
Exit Sub
End If
End Sub
-------------------------------------------------------
Weiß jemand einen Rat?
|