为什么我收到的文本值,而不是自动图文集场与我的宏在MS Word中插入自动图文集?

时间:2019-01-31 18:32:57

标签: vba ms-word

我写了一个宏,该宏在Word文档中进行文本搜索,并将该字段替换为自动文本字段。我遇到的问题是,运行此命令时,它将文本替换为自动文本字段的存储值,但实际上并未创建新的自动文本字段。即一旦运行该宏,你不能重复更新自动图文集的价值。这样做的用例是加快插入自动文本,通过用自动文本字段替换的关键字的过程。这些字段稍后会被另一个宏写入

我尝试使用AutoTextEntries(atext).insert方法没有任何运气。

Sub InsertAutoTextEntry() 
 Set locVal = ActiveDocument.Range
   With locVal.Find
      .Text = "testautotext"
      .Format = False
 ActiveDocument.AttachedTemplate.AutoTextEntries("one").Insert _ 
 Where:=Selection.Range, RichText:=True 
End Sub

我希望获得一个新的自动图文集字段,该字段可以由另一个宏访问,但是我只获取了文本值,而不是字段。

0 个答案:

没有答案