Für Word habe ich im Ordner AutoStart eine .DOT Datei, die diverse Makros enthält. Starte ich Word von Hand, wird die Datei sauber geöffnet.
In Excel habe ich nun das folgende Makro:
Set myWord = GetObject(, "Word.Application")
If Err.Number 0 Then
'Fehlervariable leeren wenn Instanz noch nicht besteht
Err.Clear
'Zuweisung der Instanz
Set myWord = CreateObject("Word.Application.8")
Else ' Err.Number 0
'Instanz besteht bereits
myWord.Activate
End If ' Err.Number 0
'Instanz in der Vordergrund bringen
myWord.Visible = True
myWord.WindowState = wdWindowStateMaximize
'Datei öffnen
If document_type = ".DOT" Then
myWord.Application.Documents.Add Template:=document_name, NewTemplate:=False
Else ' document_type = ".DOT"
' Doc Datei
myWord.Application.Documents.Open document_name, ReadOnly:=True
End If ' document_type = ".DOT"
Dies funktioniert auch bestens, document_name wird geöffnet, die .DOT Datei aus dem Ordner AutoStart wird aber nicht geöffnet. Wie kann ich Word dazu bewegen, diese Datei zusammen mit der Datei document_name zu öffnen?
(Hatte diese Frage bereits in einem Word-Forum, habe aber leider keine Antwort erhalten.)
Gruss
yogi