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

问题描述 投票:0回答:1

我在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)。

vba ms-word word-vba
1个回答
-1
投票

你需要修改你的宏以便它输出:数字{REF _Ref2236712 \ h#0} - {REF _Ref2236713 \ h#0}

© www.soinside.com 2019 - 2024. All rights reserved.