一、如何在word文档打印时自动编号

1. 首先找到Word里的宏按钮2. 弹出宏查看窗口，起一个名字然后选择创建3. 在弹出的宏录制窗口内输入宏代码，然后保存，宏代码见下方。

4. 把输入光标放在你想要添加打印份数编号的地方，然后运行宏，会弹出如下窗口，第一个窗口是输入打印份数，第二个窗口是输入起始数字 宏代码如下： Sub PrintCopies() Macro1 Macro Dim i As Long Dim lngStart Dim lngCount lngCount = InputBox(“Please enter the number of copies you want to print”, “Please enter the number of copies you want to print”, 1) If lngCount = “” Then Exit Sub End If lngStart = InputBox(“Enter the starting number you want to print”, “Enter the starting number you want to print”, 1) If lngStart = “” Then Exit Sub End If For i = lngStart To lngCount If i < 10="" then="" selection.typetext="" text:="”000″" &="" i&="" application.printout="" filename:="”"," range:="wdPrintAllDocument," item:="_" wdprintdocumentcontent,="" copies:="1," pages:="”"," pagetype:="wdPrintAllPages," _="" manualduplexprint:="False," collate:="True," background:="True," printtofile:="_" false,="" printzoomcolumn:="0," printzoomrow:="0," printzoompaperwidth:="0," _="" printzoompaperheight:="0" end="" if="" if="" (i="">= 10) And (i < 100)="" then="" selection.typetext="" text:="”00″" &="" i&="" application.printout="" filename:="”"," range:="wdPrintAllDocument," item:="_" wdprintdocumentcontent,="" copies:="1," pages:="”"," pagetype:="wdPrintAllPages," _="" manualduplexprint:="False," collate:="True," background:="True," printtofile:="_" false,="" printzoomcolumn:="0," printzoomrow:="0," printzoompaperwidth:="0," _="" printzoompaperheight:="0" end="" if="" if="" (i="">= 100) And (i < 1000)="" then="" selection.typetext="" text:="”0″" &="" i&="" application.printout="" filename:="”"," range:="wdPrintAllDocument," item:="_" wdprintdocumentcontent,="" copies:="1," pages:="”"," pagetype:="wdPrintAllPages," _="" manualduplexprint:="False," collate:="True," background:="True," printtofile:="_" false,="" printzoomcolumn:="0," printzoomrow:="0," printzoompaperwidth:="0," _="" printzoompaperheight:="0" end="" if="" if="" (i="">= 1000) And (i < 10000)="" then="" selection.typetext="" text:="i" application.printout="" filename:="”"," range:="wdPrintAllDocument," item:="_" wdprintdocumentcontent,="" copies:="1," pages:="”"," pagetype:="wdPrintAllPages," _="" manualduplexprint:="False," collate:="True," background:="True," printtofile:="_" false,="" printzoomcolumn:="0," printzoomrow:="0," printzoompaperwidth:="0," _="" printzoompaperheight:="0" end="" if="" selection.typebackspace="" selection.typebackspace="" selection.typebackspace="" selection.typebackspace="" next="" end="">

二、在word中,如何取消自动编号

一、Ctrl+Z法 大多数的Windows程序都支持“Undo”功能，即允许用户进行撤销操作，一般软件的撤销操作为一步，但也有例外，如3D Studio MAX、Word XP、WPS Office等允许用户进行多次撤销操作，的确是降低了要求，方便了用户。

不过，最近，笔者在使用Word XP时发现，如果你键入“1”或“一”并在后面加上文字后，Word XP会自动编号功能至“2”或“二”……，此时你只要按下Ctrl+Z键撤销操作，这个自动编号会消失，而且再次键入数字时该功能就会被禁止了，除非你在下一段再次激活Word XP的自动编号功能。 二、设置法 许多人找不到Word XP中设置取消自动编号的项目，其实，自动编号功能属于自动更正内容，只要我们单击“工具”→“自动更正选项”打开“自动更正选项”设置窗口，并选择“键入时自动套用格式”标签，取消选择“自动项目符号列表”和“自动编号列表”两个选项（如图1），再重新新建一个文件后就会发现Word XP再也不会自作聪明地为你自动编号了。

三、另存法 据笔者试验，Word XP中的自动编号功能仅对Word的DOC文件格式有效，因此，只要我们在键入字符前将文件另存为文本格式，Word XP就再也不会“自作多情”地为它自动添加编号了。同时，将文件另存为文本文件后还可以大大减少Word文件的大小，文本文件又能够被几乎所有的Windows程序所支持，我们何乐而不为呢？ 。

三、word自动编号怎么实现先写带有编号的内容,然后在加一页目录,把

你的问题，可用自动生成目录解决.要想自动生成题目，打文件时应设置题目格式。

一、输入题目时这样操作 1、打开WORD文档输入题目时，点菜单字体栏左侧样式窗口，选“题目1”，并选好字体和字号；如果想在目录中显示二级题目，输入二级题目时应选择“题目2”。 2、输入正文时，则应在样式窗口选择“正文”。

3、如果文件已经输入完成，可选中已输好题目，补做上述方法1程序。 4、凡设置标题样式的题目，其左侧有小黑方块标志。

二、文件输入完毕要自动生成目录时的操作： 1、将光标置于拟加目录处。 2、点“插入/索引和目录/目录”，在出现界面上在显示级别栏选定顶级别确定目录是几层；选择“显示页码”、“页码右对齐”及虚线样式等。

3、确定。至此，目录在你指定位置已经生成。

三、已生成目录的字体、间距等仍可以在目录中直接调整。

四、如何只在一页word中进行编号,打印多张它自动编号

1.使用邮件合并功能可快速完成。

2.首先新建一个excel文件，在一列中输入1 、2 、3---到自己需要打印的份数序号。并保存文件。

3.回到word文件，点击邮件---开始合并邮件----普通word文档。 4.点击选择收件人---使用现有列表，浏览找到刚创建的excel文件。

5.将鼠标定位到需要加编号的位置，点击插入合并域，此时就会出现excel文件中的列名。 6.点击预览效果可查看序号情况，最后点击完成并合并下拉中选择打印文档，打印所有即可。

。

转载请注明出处51数据库 » word打印自动编号