如何在word中实现连续编号自动打印
因机关工作需要,经常在发文打印时,需要逐份输入连续文件编号。在百度上查找相关方法,包括VBA程序都不满意,大多有点错误。因此手写了这份代码,现提供同学们参考:
Sub PrintCopies()
Dim i As Integer
Dim b As Integer
Dim a As Integer
a = InputBox(“打印份数”, “请输入打印份数”, 1)
b = InputBox(“开始编号”, “请输入开始编号”, 1)
c = a + b - 1
For i = b To c
If i < 10 Then
Selection.TypeText Text:=“000” & i
ElseIf i < 100 Then
Selection.TypeText Text:=“00” & i
ElseIf i < 1000 Then
Selection.TypeText Text:=“0” & i
Else
Selection.TypeText Text:=i
End If
Application.PrintOut
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Next
End Sub
大家复制后,拷入宏后,可以直接使用。

如何在word中实现连续编号自动打印相关推荐

  1. VBA小白的福音 如何在EXCEL中实现连续编号自动更新打印?

    VBA小白的福音 如何在EXCEL中实现连续编号自动更新打印? 用下列方法,无论你需要输入连续编号的单元格是否改变,均不需要改变代码. 第一步:将下列代码拷贝到宏中(方法请问度娘,搜代码的人应该会的) ...

  2. wps自动图文集 重新编号_如何在Word中创建和使用自动图文集词条

    wps自动图文集 重新编号 Creating and using custom AutoText entries for frequently used phrases is a great way ...

  3. 【word基础操作】如何在word中为公式编号

    最近在写大论文,其中有些公式需要编号,自己手动编号难免使其上下不整齐,网上查了很多方法,有一种方式我觉得还不错,写出来供大家参考. ---------------------------------- ...

  4. 如何在Word中跳过编号列表中的编号

    A numbered list in Word is simply a series of numbered paragraphs. There may be times when you want ...

  5. 永中word页码怎么从第二页开始_办公软件操作技巧087:如何在word中自动生成目录并同步更新目录...

    在日常工作中,我们用word编辑长篇文档比如论文时,要在正文前面插入目录,如下图,如果是在首页手动编制目录,后期调整文档内容时,目录与正文会不同步,更新起来就比较麻烦,那么这种情况该怎么办呢? 带目录 ...

  6. 如何在Word中使用MathType为公式编号并引用

    如何在Word中使用MathType为公式编号并引用 1.打开Word软件,点击插入,选择对象,在对象对话框中选择MathType 6.0 Equation, 插入想要编辑的公式,如下图 2.Word ...

  7. endnote咋手动输入文献_EndNote 如何在 Word 中手动输入引文

    EndNote 可以在 Word 中自动插入引文,那为何还要在 Word 中手动输入引文和参考文献呢?这不是脱了裤子放屁,多此一举吗?其实有时候脱了裤子放屁,也是有用处的.我相信睡觉放屁时都是把屁眼对 ...

  8. 如何在Word中排出漂亮的代码

    引言 学数学和计算机,当然还是用LaTeX排版技术文章更方便.但有时候还是迫不得已需要用Word写作,另外Word其实也有Word的好处,比如细节上的修改要比LaTeX方便. 从Matlab高亮代码复 ...

  9. 【Word】如何在第N页开始页码/如何在word中使用两组不同页码?

    目录 1.Word页码原理 2.如何在第N页开始页码 3.如何在word中使用两组不同页码 1.Word页码原理 如题,首先得弄清楚word是如何给每一页编页码的:word是以[节]为单位,一节可以是 ...

  10. 如何在 Word 中使用自定义样式生成文章目录

    如何在 Word 中使用自定义样式生成文章目录 概要 本文介绍如何在 Microsoft Word 2002 和 Microsoft Office Word 2003 中使用自定义样式创建目录.在 W ...

最新文章

  1. 半监督学习下的高维图构建
  2. mysql 动态游标_mysql动态游标与mysql存储过程游标(示例)
  3. OSS网页上传和断点续传(OSS配置篇)
  4. Extjs中给同一个GridPanel中的事件添加参数的方法
  5. YOLOv3剪枝再升级!
  6. TortoiseSVN版本管理的注意点
  7. 转贴XML的写法建议
  8. 华为机试HJ73:计算日期到天数转换
  9. 使用 Ajax 调用 SOAP Web 服务,第 1 部分: 构建 Web 服务客户机
  10. ECSHOP解决大量重复页面问题,提高SEO效果
  11. faiss python安装_如何在ubuntu 18.04上安装faiss GPU
  12. 前端js上传文件转base64
  13. c语言运行全屏,怎么用代码控制C源程序运行时窗口是全屏的?
  14. html 讲课ppt,使用HTML制作网页讲课.ppt
  15. PetaLinux学习笔记 3
  16. 打开Word,显示无法创建工作文件,请检查临时环境变量的解决办法
  17. 城市地铁类毕业论文文献包含哪些?
  18. minus用法c语言,Minus-C 一个最小化的C语言规范
  19. 基于灰度投影法的图片偏移测量
  20. 网易2019实习生招聘编程题集合

热门文章

  1. JAVA基础知识点总结
  2. Openstack实验之yum源配置
  3. typedef用法,函数指针
  4. adb最新版下载地址
  5. 按计算机应用领域来分 电子邮件属于,计算机考试题库和答案.doc
  6. 嵌入式的c语言,嵌入式c语言
  7. 微信小程序电子签名实现并识别文字
  8. SPSS——非参数检验——1-Sample K-S 单个样本(Kolmogorov-Smirnov)柯尔莫哥洛夫-斯米诺夫检验
  9. 【0201】用户登录界面设计
  10. abaqus与python后处理_abaqus用Python批量后处理教程!如何从abaqus导出python