陆地水循环分享 http://blog.sciencenet.cn/u/afantics

博文

批量修改word文档交叉引用的颜色

已有 589 次阅读 2021-11-9 09:32 |个人分类:软件使用|系统分类:科研笔记

批量修改word文档交叉引用的颜色

如果文中具有大量图表引用,通常在word中使用交叉引用功能,必要时需要对交叉引用进行突出显示,例如标记为蓝色。但是在执行更新域功能后,或者原本未设置交叉引用颜色,交叉引用均为蓝色。

可使用word中的宏命令使用VB语言批量修改颜色:

视图→宏→查看宏→创建→删除多余代码→输入以下代码

Sub Macro1()

'

' Macro1 Macro

' 宏在 2013-1-13 由 admin 录制

'

For i = 1 To ActiveDocument.Fields.Count

If Left(ActiveDocument.Fields(i).Code, 4) = " REF" Then

' 如果是交叉引用域

ActiveDocument.Fields(i).Select   '选中该域

Selection.Font.Color = wdColorBlue  '字体颜色设为蓝色

End If

Next

End Sub

→点击绿色箭头运行(F5)

则文章中所有交叉引用均变为蓝色。



https://blog.sciencenet.cn/blog-3459054-1311607.html

上一篇:使用AquaChem 3.70绘制Piper三线图
下一篇:青藏高原水文站信息,经纬度,站名与建站时间

0

该博文允许注册用户评论 请点击登录 评论 (0 个评论)

数据加载中...

Archiver|手机版|科学网 ( 京ICP备07017567号-12 )

GMT+8, 2022-1-17 03:13

Powered by ScienceNet.cn

Copyright © 2007- 中国科学报社

返回顶部