word怎么生成打印编号(word怎么打印页码)

第一步

首先找到Word里的宏按钮，如图。

然后，会弹出宏查看窗口，起一个名字然后选择创建，如图。

第二步

在弹出的宏录制窗口内输入宏代码，然后保存，如图。

宏代码如下：

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 Sub

第三步

把输入光标放在你想要添加打印份数编号的地方，然后运行宏，会弹出如下窗口，第一个窗口是输入打印份数，第二个窗口是输入起始数字，如图。

首先，打开一个word文档，在菜单上执行插入--页码

我们在其打开的列表里可以看到有几种页码的格式：最通用的就是页码在页面的底端、还可以设置在顶端，页边距，当前位置等。我们选择一个合适自己的页码

插入了页码以后，我们可以对页面的格式进行设置，还是在同样的地方执行：插入--页码。在下拉列表中选择设置页码格式

在页码格式对话框中，我们设置编号格式，你可以看到这个列表中有很多种，选择一个你需要的编号格式。然后点击确定。

接下来，我们还需要注意，不是说整个文档都使用同样的页码格式，有时候我们需要使用在第五页的时候重新开始第一页，这就需要插入节。如图所示，将光标移动到要插入页码的地方，然后执行：页面布局--分隔符

接着再执行：插入--页码。选择一个适合自己的页码格式

接着我们还是看到，页码没有从1开始，而是续接了上面一节的页码，所以我们要在菜单栏中，点击【链接到前一条页眉】这个选项使其处于未被选中的状态。

接着我们点击：插入--页码--设置格式

在设置格式对话框中，我们勾选 起始页码，输入起始值，这个值可以是任意的值。然后点击确定即可。

word可通过以下步骤设置打印标题：1、打开表格所在的word文档，在两页的分隔处会发现第一页是有表头的，而第二页没有表头；2、找到工具栏中的“表格工具”，选择“表格属性”，点击“表格属性”即可；3、也可选中“表头”，右击鼠标，在出现的下拉框中选择“表格属性”，点击即可；4、在弹出的“表格属性”对话框，对话框中选择“行”，点击，在“行”下面“选项”中的第二行“在各页……重复出现（H）”前面打勾，点击“确定”键；5、点击“确定”后会发现第二页的表格上和前一页一样的表头标题了。百倍用心，10分满意