有学员制作论文

对各级标题设置了标题样式

还设置了编号

保存后再打开

发现很多的标题编号都变成了小黑块

一个一个重新设置了编号后

再保存后打开还是小黑块

另外标题样式了相关的样式前本来有个编号

（因为标题样式都编号了）

但是却显示为一个竖黑线

怎么办？

经过搜索研究发现

很可能是在模板列表里的某些跟字体有关的特性被损坏了

这个可能是设置不当或者就是一种bug

解决方法百度也不少

但是比较高效的

几乎可以解决各种黑块的问题的

推荐下面做法

1、在当前文档里，ALT+F11，插入，模板

2、在下图处粘贴代码

Sub 黑()

For Each temp In ActiveDocument.ListTemplates

For Each lst In temp.ListLevels

lst.Font.Reset

Next

Next

End Sub

3、按F5或Fn+F5运行代码

大约几秒钟就搞定了

右键单击模块，移除模块，关闭VBA编辑器窗口

再看看word文档

发现黑块都被处理成正确的编号了

更多活灵活现淋漓尽致酣畅淋漓的解读，更多Excle，PPT，Word 实战技能足以让你傲视群雄

请参考这套课程，饕餮之夜等您开启

《Excel+PPT+Word小白变大神[520节]》