Hallo! Wenn ich in einer Arbeitsmappe unter Auto_open den Befehl "Call Starte_Muster" einbaue, dann wird die Datei unsichtbar geöffnet. Wie erreiche ich bitte dass die Datei "Muster" sichtbar geöfffnet wird?
Dim appOffice As Workbook
Sub Starte_Muster()
Set appOffice = GetObject("G:\DOK\Master\" & _
"Muster.xls")
End Sub
Hi Josef,
versuche es mal mit
Workbooks.Open "G:\DOK\Master\" & "Muster.xls"
AW: Zweite Datei mittels Makro öffnen
14.03.2011 09:47:41
Josef
Hallo!
Danke für die Antwort. Würde funktionieren, nur wird bei der zweiten Datei "Makro aktivieren" nicht angezeigt. Daher werden auch die Makros in dieser Datei nicht abgearbeitet.
Josef
AW: Zweite Datei mittels Makro öffnen
14.03.2011 09:55:19
Hajo_Zi
Hallo Josef,
dann schreibe noch hinter
ActiveWorkbook.RunAutoMacros xlAutoOpen
ungetestet. Gruß Hajo
Anzeige
AW: Zweite Datei mittels Makro öffnen
14.03.2011 09:58:43
Josef
Hallo Hajo!
Meintest Du so?
Workbooks.Open "C:\Test.xls
ActiveWorkbook.RunAutoMacros xlAutoOpen
Danke
AW: Zweite Datei mittels Makro öffnen
14.03.2011 10:03:57
Hajo_Zi
Hallo Josef
wenn Du in der ersten Zeile am Ende noch ein " machst, ist es ok Gruß Hajo
AW: Zweite Datei mittels Makro öffnen
14.03.2011 09:40:44
Hajo_Zi
Hallo Josef,
schreibe es nicht auf ein Objekt.
Workbooks.Open "C:\Test.xls"
Ich gehe mal davon aus die Datei ist nicht ausgeblendet.
Danke
14.03.2011 10:01:47
Josef
Hallo Hajo!
Danke für Deine Hilfe. Hat jetzt gepasst.
Schönen Tag noch
Josef