Hallo zusammen
Ich möchte aus Outlook 2019 via Makro eine Wordvorlage starten um dann den Speicherort selber zu wählen. Das funktioniert soweit. Leider öffnet sich Word nur im Hintergrund. Wie kann ich das machen dass Word dann im Vordergrund startet?
Hier das Makro:
Sub FormularBrief()
Dim AppWD As Object
Set AppWD = CreateObject("Word.Application")
AppWD.Visible = True
AppWD.WindowState = wdWindowStateMaximize
AppWD.Activate
'Vorlage öffen
AppWD.documents.Add "R:\00_Formulare\Formular Allgemeiner Brief.dotx"
End Sub
Besten Dank für eine Lösung
Ich möchte aus Outlook 2019 via Makro eine Wordvorlage starten um dann den Speicherort selber zu wählen. Das funktioniert soweit. Leider öffnet sich Word nur im Hintergrund. Wie kann ich das machen dass Word dann im Vordergrund startet?
Hier das Makro:
Sub FormularBrief()
Dim AppWD As Object
Set AppWD = CreateObject("Word.Application")
AppWD.Visible = True
AppWD.WindowState = wdWindowStateMaximize
AppWD.Activate
'Vorlage öffen
AppWD.documents.Add "R:\00_Formulare\Formular Allgemeiner Brief.dotx"
End Sub
Besten Dank für eine Lösung