Makro lässt sich nicht korrekt ausführen

[Stephan]

> Woran liegt das?

WAhrscheinlich daran das Du ein faslsches Dokumentobjekt referenzierst, das müßtest Du selbst durch debuggen prüfen indem Du entweder XRAY nutzt oder einfach Msgbox dbg_properties oder Msgbox dbg_methods und schaust was überhaupt noch ansprechbar ist.

Bei einem mehrfach gekürzten Code geben ich nicht gerne eine Prognise auch weil ich den nicht 'einfach so' laugfen lassen kann, ansonsten würde icch ins Blaue rein raten das Folgendes helfen könnte:

Deklariere vor:

Code: Alles auswählen

Sub Makro1()

die Variable:

Code: Alles auswählen

Dim tmp_doc As Object

füge vor:

Code: Alles auswählen

oDocument.close(false)

ein:

Code: Alles auswählen

tmp_doc = oDocument

ersetze:

Code: Alles auswählen

ActiveDocument.FormFields("RMA").Result = RMA

durch:

Code: Alles auswählen

tmp_doc.FormFields("RMA").Result = RMA

Gruß
Stephan