打开批量打印PDF.xlsm界面如图请点击输入图片描述点击按钮批量打印PDF文件蓝色按钮，在弹出的对话框中输入存放PDF文件的路径，确定。如图请点击输入图片描述开始加载打印文件到打印机进行打印，如图。请点击输入图片描述...

这很简单的。首先，您要做“页面设置”，如图，使类似如图的1*-3行在每页显示。然后您调整行高（或纸张大小），使每页的显示符合您的要求。打印预览符合要求后，您要做的是：另存为，保存类型为pdb即可。本人试的效果如...

1、首先双击打开PDF应用。2、如图点击红圈里的“合并文件”，轻轻点击鼠标左键打开。3、点击后出现如下图的弹屏。4、选中要计算页数的文件。5、将文件拖拽到步骤四的弹屏里。如图所示。6、拖拽完成后点击红圈里的“下一...

录制宏就行了。按住ctrl单击两个sheet的标签，就同时选中了2个工作表，再打印为pdf文件，可以用xps打印机，看录制的宏代码即可。也可以这样：ThisWorkbook.UnprotectPassThisWorkbook.Sheets("hzxx").Visible=xlSheetHidden...

一般直接用ExportasPDFActiveSheet.ExportAsFixedFormatType:=xlTypePDF,Filename:=_"E:\统计\"&"PDF名字"&".pdf",Quality:=_xlQualityStandard,IncludeDocProperties:=True,IgnorePrintAreas:

❤改用Excel2010，直接VBA中另存为PDF格式。❤不知道您使用的PDF打印机是哪种？以我用的PDFCreator为例，设置PDFCreator自动打印，并用当前时间为打印的文档自动取名字。这样自动打印的文档名字起码是按照时间排序...

一般我都是在文件夹窗口，选中所有文件（我的都是word文档），然后点击菜单栏中的打印按钮即可。有其它文档的情况我没试过。

1."Sheet2.PrintOut1,1,1,False,"AdobePDF",True,False,str3,False"printout方法只需要8个参数◆打印当前工作表：oExcel.ActiveSheet.PrintOut()&&共八个参数参数1-数值：起始页号，省略则默...

首先，加载引用，如图然后，在打印机中对AcrobatDistiller的打印进行设置设置（必须，否则转化出错！）PublicSubMakePDF(ByValstrPDFFileNameAsString)DimstrPSFileNameAsStringDimxlWorksheetAsWorksheetDim...

SubMacro1()'IfMsgBox("是否确定要保存为PDF",vbOKCancel)=vbOKThenActiveSheet.ExportAsFixedFormatType:=xlTypePDF,Filename:=_"D:\"&Format(Now(),"yyyymmdd-hhmmss")&".pdf"