“从 1 重新开始”重置标题样式的段落格式

Question

为了说明我的问题：

1. 创建新文档

2. 输入三行文本：“H1”、“H2”、“H3”。

3. 选择所有行。

   • 单击样式“标题 2”。
   • 选择编号，例如“数字对齐：左”。
   • 添加2 ch左缩进和2 ch悬挂。
   • 更新样式“标题 2”以匹配选择。

4. 右键点击第三行的编号，选择“从1重新开始”

5. 观察压痕和悬垂部分是否断裂。

6. 单击“标题 2”无法修复此问题。

我的文档中有多个 1 级标题，每个 1 级标题下有多个 2 级标题。我想在任何 1 级标题结束时重新开始每个 2 级标题的编号，同时确保所有 2 级标题的样式一致——具有相同的缩进和悬挂。我该如何实现这一点？

Answer 1

通过定义新的多级列表样式、格式化对话框中的 2 级列表以及更新标题 2 样式以匹配选择，可以解决问题。

Answer 2

请注意，如果您有一个名为“RestartNumbering”的 VBA 子程序，则当您尝试“从 1 重新启动”时将运行该子程序。

例如，如果我的代码在“Sub RestartNumbering()”中更改了缩进或字体大小，那么当您从弹出菜单重新开始编号时总会发生这种情况，并且没有格式可以阻止这种情况。