ExcelVBA一键批量打印文件夹中的所有word文档
==================
【问题】总公司有收到有几百个word文件,每一个都要打印5份,几W个呢!...=======================
【目标】一键完成,
【用法】把下面的代码放在一个Excel文件中,一健~选定所有文件~确定
【代码】
========放在Excel文件中批量打印word...文件=======
Sub print_word_()
Dim fileToOpen, GetOpenFilename, App,iFile
fileToOpen =Application.GetOpenFilename...(filefilter:="Word文档(*.do*),*.do*",FilterIndex:=4, Title:="请选择要处理的文档(可多选)", MultiSelect:=True)
If Not...参数介绍
下面我们给出Printout的中文语法
打印范围.PrintOut(从哪页开始打, 打到第几页, 打印份数, 打印求是否预览, 打印机名称, 是否打印到文件, 是否打印多个副本,打印到文件的名称