使用 vba 根据用户选择添加特定引用答案

【问题标题】：Add specific citation based on user selection with vba使用 vba 根据用户选择添加特定引用
【发布时间】：2015-07-14 06:34:34
【问题描述】：

我正在尝试创建一个用户表单，用户可以在其中选择一年并根据该选项插入特定书籍的引文。我尝试在文本中插入一个 DOCVARIABLE（称为“BookYear”）字段，然后通过 VBA 更改变量值（为“Aus15”）。下面的代码不起作用，但我认为我在正确的道路上

Sub Macro2()
    If myComboBox = 2015 Then
        ActiveDocument.Variable("BookYear").Value = "Aus15"
        ActiveDocument.Fields.Update
    end if
End Sub

【问题讨论】：

标签： vba field ms-word citations

【解决方案1】：

找到答案

MyText = "Aus15"

选择示例： ''选择书签的代码 Selection.Fields.Add Range:=Selection.Range, _

类型：=wdFieldCitation，文本：=MyText

【讨论】：