在打印Excel表格中如何把序号打印出来

     材料/工具：EXCEL2010

      1、打开Excel2010表格文件，点击【文件唯谨嫌】按钮

      https：//imgcdn.idongde.com/qa/2020/04/29/13/1588139170701315

      2、在打开的信息界面点击【打印】

      https：//imgcdn.idongde.com/qa/2020/04/29/13/1588139170240638

      3、在“打印”界面向指手下滚动【设置】位置的滚动条，找到并晌液点击【页面设置】

      https：//imgcdn.idongde.com/qa/2020/04/29/13/1588139170956006

      4、在“页面设置”窗口点击【工作表】选项卡，在【打印】区域找到“行号列标”，勾选其前面的复选框，【确定】设置生效

      https：//imgcdn.idongde.com/qa/2020/04/29/13/1588139170543667

      5、现在我们可以在打印预览中看到表格行和列的编号了，我们下次再打印该文件时Excel将自动打印这些编号

      https：//imgcdn.idongde.com/qa/2020/04/29/13/1588139170915761

第一步

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

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

第二步

在d出的宏录制窗口内含肆指输入宏代雹手码，然后保存，如图。

宏代码如下：

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

第三步

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

这个方法比较多，常见的比如域代码法、vba法、打印软件法等。

这里介绍一下域代码法。

步骤1、首先我们做个准备工作，生成个举例文档，根据你的需求，一会儿我们会手哪在编号后面生成一个单据号，平时是隐藏的，但是会打印出来伏薯搭，而且是每打印一次，单据号缺拿自动加1。

那么我们只需要解决2个问题即可：1.单据号在word中隐藏；2.单据号随打印次数递增；

步骤2、我们继续做准备工作，点击文件-选项-显示

然后勾选“打印隐藏文字”和“打印前更新域”

同时标记这里也什么都不勾选

点击确定。

步骤3、继续准备工作。文件-选项-高级-打印-取消勾选“打印域代码而非域值”，注意是取消勾选，不勾选。

步骤4、准备工作做完，开始正式内容

首先在编号这里打字，输入你想要的单据号的汉字和英文，这里我就随便输入了

步骤5、然后在2021的后面，同时按下ctrl和f9，插入一个空域，变成下图这样

步骤6、在这个空域中输入= a + 1，然后选中这个域

步骤7、点击插入选项卡-书签，输入a，点击添加，然后关闭书签窗口

步骤8、然后我们在1的后面敲个空格，再输入 \# 0000，如下图所示

这里是让数字显示为4位数字，如果想改成三位，就变成三个0，如果不想让显示0，就不写

这里要注意\#中间不能有空格

步骤9、ctrl+a全选整个文档，然后按f9，更新域，文档就变成下图的样子了

步骤10、然后我们选中编号后面的文字

步骤11、同时按下ctrl和D，打开字体设置，点击隐藏

点击确定，这样单据号就隐藏了

步骤12、现在我们打印的时候，就解决了单据号在word中隐藏和单据号随打印次数递增的问题了。

扩展：

如果你想要查看当前单号是多少，那么点击显示隐藏编辑标记即可

就在开始选项卡，样式库的左边，快捷键ctrl+shift+8

---