在交叉引用域代码中插入/修改文本

Question

我在 Word 中构建了一个自定义交叉引用工具，允许用户同时选择多个连续项目进行交叉引用。 例如，按住 Shift 按钮并选择图 1 到图 5 当前会在我的文档中插入“图 1 - 5”，这两个数字都作为可更新的域代码与各自的数字相关联。 域代码切换如下所示：

{ REF _Ref2236712 \h \* \Charformat } - { REF _Ref2236713 \h \# 0}

该字段通过 VBA 插入到文档中。 下面是如何插入第一个字段的示例：

Selection.InsertCrossReference ReferenceType:=ReferenceType.Value, _
referencekind:=wdOnlyLabelAndNumber, referenceitem:=i, insertashyperlink:=HyperlinkChoice

...

Set fld1 = rng1.Fields(1)
fld1.Code.Text = fld1.Code.Text & "\* Charformat "
fld1.Update

如何修改域代码 VBA，使文档中的最终结果显示为“图 1 - 5”而不是“图 1 - 5”？ 我尝试在方括号内的不同位置添加像“s”和“s”这样的字符串，但没有成功。

更进一步，是否可以将“附录 A - 附录 C”更改为“附录 A - C”？ 这是一个更大的挑战，因为它不涉及简单地添加一个字母来实现复数。 此外，之前的数字格式转换 (\\# 0) 不适用于字母字符（意味着附录 C 不会被缩减为仅说 C）。

Answer 1

您需要修改宏，使其输出： Figures { REF _Ref2236712 \\h # 0} - { REF _Ref2236713 \\h # 0}