Word宏操作(正文交叉引用格式调整)

脚本

正文交叉引用格式调整

Sub 调整交义引用格式()
For Each objFld In ActiveDocument.Fields
    If objFld.Type = wdFieldRef Then '筛选交叉引用域对象
        objFld.Select '选中交义引用
        '设置字体格式
        With Selection.Font
            .Size = 12 '设置字号为小四
            .NameFarEast = "宋体" '中文宋体
            .NameAscii = "宋体" '非中文宋体
        End With
    End If
Next objFld
End Sub

Document.Fields返回一个Fields集合，代表文档中所有域。

根据域类型选出Ref引用类

---

参考链接

WdFieldType类型枚举