2017-12-03 273 views

回答

0

请尝试以下方法:

{ DOCVARIABLE TestVar \* MERGEFORMAT } 


Sub DocVars() 
    Dim arr As Variant, joinSting As String 
    arr = Array("One", "Two", "Three", "Four", "Five") 
    joinSting = Join(arr, vbNewLine) 
    ActiveDocument.Variables("TestVar").Value = joinSting 
End Sub 

Output:

+0

THX!它工作,但创建新的段落,而不是段落 内的新行无论如何,我不打算使用VBA - 已纠正原来的帖子 – Belegnar

+0

AFAIK,你不能使用'DOCVARIABLE'没有'VBA'。请参阅此[链接](https://support.office.com/en-us/article/Field-codes-DocVariable-field-32a81e22-c5c1-4b16-8097-f0de851db67c?ui=en-US&rs=en-US&ad = US)。 – Arul

+0

DOCPROPERTY对我来说可以。谢谢 – Belegnar