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

情况如下图所示：



[解决办法]
Dim rng As Range

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

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