Office: Word-Datei mit Excel im Bearbeitungsmodus öffnen

Hallo Zusammen,

Ich öffne über Excel in meinem Code eine Word-Datei und beschreibe sie mit unterschiedlichen Daten, funktioniert auch alles soweit.
Die Word-Datei ist schreibgeschützt. Word 2013 öffnet die Datei je nach Einstellung am PC im Lesemodus. Dadurch kann mein Makro die Word-Datei nicht beschreiben. Wie muss ich meinen Code ändern damit die Word-Datei direkt im Bearbeitungsmodus geöffnet werden kann.

Hinweis die Variablen die ich hier in dem Code-Schnipsel deklariere sind bei mir eigentlich Global Deklariert und hier nur zum Verständnis aufgeführt. Die Variable strWordDatei enthält den Datei Pfad der Word-Datei.

Hier mein Code zum öffnen meiner Word-Datei:
Code:

Vielen Dank für eure Zeit!

Grüße Sven

:)

 

Die Funktion tut nicht das, was im Kommentar steht: 'Prüfen ob Word Applikation geöffnet ist.

Wie dem auch sei, die Funktion startet eine neue Instanz von Word, lässt sie "hidden" und öffnet dort die Datei zum Schreiben. Funktioniert!

Ich sehe allerdings nirgends, dass die Datei geschlossen wird und die Word-Instanz beendet wird.
Der nächste Aufruf der Funktion wird daher scheitern bzw. es wird eine Meldung aufpoppen, die fragt, ob Du schreibgeschützt öffnen willst.

Wie immer, Beispieldatei ...

 

Danke für deinen Hinweis bzgl. des Kommentars. Hatte die mal umgeschrieben und vergessen den Kommentar zu ändern.

Diese Funktion soll die Datei auch nicht schließen. Und bis die Funktion wieder aufgerufen wird ist alles ordnungsgemäß abgehandelt. Die Funktion meines Codes ist gegeben. Ich bin nur zum ersten Mal auf diesen Lesemodus gestoßen. Dafür habe ich nun eine Lösung.

So sieht nun Final meine Lösung aus:
Code:

Danke!

Gruß Sven