发布网友 发布时间:2022-05-04 12:13
共1个回答
热心网友 时间:2023-10-22 14:57
你原来的编号1、2、3、....85、等,看样子不是Word自动编号格式的,所以你在第一段末尾回车之后,后面的编号不会自动更新的,可以有两种方法来实现你的目的:一、用宏代码后台自动替换SubMyReplace()Fori=2To5'这里的5是你的文档中段落连续编号的最大段落数,可以根据你的实际情况自行更改指定Selection.Find.ClearFormattingSelection.Find.Replacement.ClearFormattingWithSelection.Find.Text=(^13)(*[0-9]、).Replacement.Text=\1+Trim(Str(i))+、.Forward=True.Wrap=wdFindContinue.Format=False.MatchCase=False.MatchWholeWord=False.MatchByte=False.MatchAllWordForms=False.MatchSoundsLike=False.MatchWildcards=TrueEndWithSelection.Find.ExecuteWithSelectionIf.Find.Forward=TrueThen.CollapseDirection:=wdCollapseStartElse.CollapseDirection:=wdCollapseEndEndIf.Find.ExecuteReplace:=wdReplaceOneIf.Find.Forward=TrueThen.CollapseDirection:=wdCollapseEndElse.CollapseDirection:=wdCollapseStartEndIfEndWithNextiEndSub二、先把所有手工编号采用通配符的自动替换方式删除掉,然后再把连续的段落选中,采用工具栏上的自动编号重新编号,以后段落发生了增加或者删除,编号就自动更新了。把新插入的编号为1、的段落的前面编号删除掉,然后从第一段一直到编号最大的末尾的那段全部选中,然后Ctrl+H打开替换对话框,单击高级,勾选使用通配符,在查找框中原样粘贴(^13)(*[0-9]、),在查找框中原样粘贴\1,然后单击全部替换,关闭对话框,保持原来文本选中状态,右键-项目编号,在打开的项目编号对话框中选中一种或者自定义一种编号样式即可,以后增删段落后的编号就会自动更新了。