一键批量打印EXCEL、WORD文档

一键批量打印EXCEL、WORD文档,本方法也可以打印同一个文档N份,可以批量打印A3、A4文档,包括单、双面打印等。希望能帮到广大朋友。请大家注重原创版权,不得在未经许可的下转载、传播,或者用来对同事装逼等。。。谢谢合作!!!

工具/原料

  • 电脑一台
  • 打印机一台

方法/步骤

  1. 1

    第一步:

     先设置系统突破打印上限(因为系统默认一次最多可选打印文档是15份)

  2. 2

    点击【开始】在【搜索程序和文件】中输入“regedit”打开注册表,然后展开到“HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer”下,在右键选择新建一个“DWORD32位”,重命名为“MultipleInvokePromptMinimum”,然后双击它,把它的值修改为你想要同时打开的文件数就可以了。(注:修改时,请选择十进制,20就代表同时打开20个,请根据自己电脑和系统的能力来设定,即使修改后,针对较大的文件还是要以较少打开数量同时,因为改的过火造成系统死机等情况,概不负责,我设置的是1000)。

  3. 3

    此时在系统里就可以一次性选择多个文档一次单击右键选择打印了,如图所示:

  4. 4

    第二步:

    设置系统默认打印设备

    1、在开始菜单右边点击【设备和打印机】,选择要批量打印文档的默认打印设备并设为默认打印机

  5. 5

    2、如需要批量打印双面(A3、A4)则需设置【打印机首选项】,在里面设置你需要打印的纸张大小及双面打印设置,(因为每个打印机的设置都不同,大家自己好好找找),设置完成点击确定。如下图所示:

  6. 6

    3、设置完毕后再结合第一步的方法批量打印所有需要的打印的文档。

  7. 7

    第三步:

    设置将多个文档同时打印多份

    1、先将文档排序方式设置成以【名称】排序;

    2、然后我们将要打印多份的文档选择后按【Ctrl+C】的方式复制,再以【Ctrl+V】的方式粘贴,如果我们要将文档打印3份的话就连续两次【Ctrl+V】,这样就会在同一文件内有同一个文件的多个副本,这时我们再结合第一步的方法批量打印文档。

    END

注意事项

  • 修改打印选择上限时,请选择十进制,20就代表同时打开20个,请根据自己电脑和系统的能力来设定,即使修改后,针对较大的文件还是要以较少打开数量同时,因为改的过火造成系统死机等情况,概不负责
  • 2
    点赞
  • 5
    收藏
    觉得还不错? 一键收藏
  • 打赏
    打赏
  • 0
    评论
Excel VBA中实现批量提取Word表格内容可以通过以下步骤进行: 1.首先,在Excel的工作簿中打开Visual Basic Editor(VBE)。 2.在VBE的工具栏上,选择“插入”→“模块”,在模块中编写VBA代码。 3.在编写代码之前,确保已经添加对Microsoft Word对象库的引用。可以通过在VBE中选择“工具”→“引用”来添加引用。 4.在VBA代码的模块中,使用Word对象变来打开Word文档。例如,可以使用以下代码打开一个名为"Document1.docx"的Word文档: ``` Dim wdApp As Word.Application Dim wdDoc As Word.Document Set wdApp = New Word.Application Set wdDoc = wdApp.Documents.Open("C:\路径\Document1.docx") wdApp.Visible = True ``` 5.接下来,使用“With”语句和对象变来引用Word文档中的表格,然后遍历表格中的每个单元格,并将其值复制到Excel工作表中。 ``` With wdDoc For Each tbl In .Tables For Each cell In tbl.Range.Cells '将单元格值复制到Excel工作表中的指定位置 Worksheets("Sheet1").Cells(rowNum, colNum).Value = cell.Range.Text '更新行号和列号 rowNum = rowNum + 1 colNum = colNum + 1 Next cell Next tbl End With ``` 6.在代码结束时,记得关闭Word文档和应用程序对象。 ``` wdDoc.Close wdApp.Quit Set wdDoc = Nothing Set wdApp = Nothing ``` 以上步骤将通过Excel VBA实现一键批量提取Word表格内容。可以根据具体需求进行适当的修改和调整,如指定目标表格的位置、添加错误处理等。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

lxw1844912514

你的打赏就是对我最大的鼓励

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值