首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VBA >

在word中怎么使用宏将除表格以外的所有文字设置成标题

2012-10-20 
在word中如何使用宏将除表格以外的所有文字设置成标题一个文档有几千个表,每个表上面都有关于这个表的说明

在word中如何使用宏将除表格以外的所有文字设置成标题
一个文档有几千个表,每个表上面都有关于这个表的说明。
现在想把表的说明全部设置成标题,何使用宏将除表格以外的所有文字设置成标题???

情况如下图所示:



[解决办法]
Dim rng As Range

For Each rng In ActiveDocument.Words
If 0 = rng.Tables.Count Then
rng.Style = "标题 1"
End If
Next

其中"标题 1"为你文档中有的样式名。

热点排行