word用宏命令完美解决列表编号变黑块的问题

 

相信不少人跟我同样，屡次定义新的多级列表，会致使列表编号变成下面这样黑块

在百度搜索结果尝试了鼠标左键选中应用样式，文档关闭后打开问题依旧；

仍是得感谢万能的Google，帮我找到了答案。

问题根因：

The problem occurs because the font characteristics in the list template have become corrupted. 

大概意思就是模板中的字体损坏了，英文很差认不全囧。

解决步骤：

1. 打开VB编辑器

没有开发工具栏的请自行百度“word 开发工具"

2. 工具->宏

 

3.建立宏

 

 4. 贴入代码：

For Each templ In ActiveDocument.ListTemplates
For Each lev In templ.ListLevels
lev.Font.Reset
Next lev
Next templ

 

5. 运行宏

 

 能够看到标题变回来了：

 

 

 参考：https://answers.microsoft.com/en-us/office/forum/office_2010-word/ms-word-header-styles-are-showing-black-boxes/c427b21c-dcda-46ce-a506-b9a16c9f2f3f?auth=1