编号打印软件 如何在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 Sub

Excel 怎么设置编号每打印一次自动递增

第一步，在excel里，按ALT+F11，会弹出一个窗口

第二步，在弹出的窗口里选 菜单中的插入，模块

第三步，复制粘贴下面

Sub dayin()

dim n as integer

n=inputbox("打印次数") *1

for i=1 to n

activesheet.PrintOut Copies:=1

[H2]= "NO:" & application.text(i,"0000000000")'这里是H2，改成自己需要的单元格，后面是数字格式，根据需要修改

next

End Sub

代码，然后关闭窗口

第四步，回到excel中》宏》dayin》确定，输入打印份数

证件打印用什么软件最好呢?

你可以百度 飚风证件证书打印软件 是专业打印证件证书的软件

1、支持摄像头拍照，现场做证，一般用在大型会议制作出入证等场合

2、支持绑定excel批量打印

3、支持按客户需求制作模版

4、支持客户自定义模版

怎么打印带有自动编号的胸牌？100悬赏

可以用EXCEL的智能填兖功能，就是输入7-001然后点这个单元格右下角的黑点向下拉就可以得所有的缟号，设定好之后再调整下就可以打印

同一个PDF文件，怎么添加打印序号（编号）求!

1、在比如A100单元格输入个空格（或任何字符）

2、在“页面设置”的“打印标题”中将一张单据区域整个设置为“顶端标题行”

3、用页眉或页脚设置“编号”为：2009000&[页码]

4、打印时，设置打印页码范围为1至180页即可。

能再具体点嘛？没有理解。

有什么条码批量打印软件,每张条码编号都不一样的

建议买条码打印机 这样机器自带的免费软件就能实现你 的要求

有两种打法 一是 变量 序列号式

二 数据库式 你可以把要打印的编到EXECL里，从打印机软件里选择数据库打印

什么是电脑文档的编号、打印、排版和归档?

简单，应该是刚刚工作的人吧，对电脑不熟悉。编号其实就是我们说的重命名，右键单击文档就可以看见。 打印，你应该用的CAD吧，按ctrl+p打印出现这样的对话框 打印机\绘图仪项 选择你的打印机，然后图纸尺寸里选择你需要的纸张尺寸。打印区域打印范围里选择窗口然后cad的操作界面会出现个十字你按住左键拖出你想要的范围，居中打印。打印比例如果要求有比例的话就把布满图纸勾去，填入图纸的比例。然后右下角图形方向选择纵向还是横向。左下角预览下。合适的话右键打印就可以了。排版也就是横竖，也一下就好，归档就是保存

文件自动编号工具及文件名打印

可以啊

进入DOS模式

通过命令进入MP3所在文件夹(比如在D:/MP3

CD D:/MP3

DIR D:/NAME.TXT

这样文件名就保存起来了.

之后把这些复制到EXCEL(电子表格)中,再进行编号..如果你不会使用EXCEL,就比较麻烦了。

转载请注明出处51数据库 » 编号打印软件 如何在word文档打印时自动编号