✔ Variablenzuweisung in Word

[cherokee0815]

Hi,

ich bin totaler VBA Neuling, hab sonst aber Ahnung vom Programmieren.

Ich will aus einem Dokument heraus ein zweites öffnen, dort einigen Textmarken Werte aus dem ersten Dokument zuweisen und das ganze dann ausdrucken.
Jetzt scheitere ich allerdings bereits am ersten Schritt:

Dim nextDoc As Document

nextDoc = Documents.Open FileName:=".\Solar.doc", ConfirmConversions:=False, _
              ReadOnly_:=False, AddToRecentFiles:=False, PasswordDocument:="", _
              PasswordTemplate :="", Revert:=False, WritePasswordDocument:="", _
              WritePasswordTemplate:="" , Format:=wdOpenFormatAuto, Visible:=False

Ich erhalte folgende Fehlermeldung: Unzulässige Verwendung einer Eigenschaft

Wenn ich das ganze so laufen lasse:

Dim docLoop As Document

Documents.Open(FileName:=".\Solar.doc", ConfirmConversions:=False, ReadOnly _
        :=False, AddToRecentFiles:=False, PasswordDocument:="", PasswordTemplate _
        :="", Revert:=False, WritePasswordDocument:="", WritePasswordTemplate:="" _
        , Format:=wdOpenFormatAuto, Visible:=False)
        
For Each docLoop In Documents
    MsgBox docLoop.Name    '*
Next docLoop

taucht der richtige Name auf.

Wenn ich bei *

If docLoop.Name = "Solar.doc" Then nextDoc =  docLoop

einfüge, erhalte ich die selbe Fehlermeldung wie oben.

Was mache ich falsch / was muss ich tun.

Viele Grüße,
chero

 

[cherokee0815]

Lösung:

mit

SET nextDoc = Documents.Open(...)