代码如下：On Error Resume Next Const wdExportFormatPDF=17Set oWord=WScript.CreateObject("Word.Application")Set oExcel=WScript.CreateObject("Excel.App4.关闭VBA编辑器返回Excel界面。按Alt+F8打开“宏”对话框，执行“BatchConvertWorkBookToPDF”宏。5.在弹出的“浏览”对话框中选择包含要转换工作簿的文件夹，
手动将每个Excel文件转换为PDF格式是非常繁琐的，因此使用VBA将Excel文件批量转换为PDF格式是非常有用的。使用VBA批量转换Excel文件为PDF的主要步骤如下：1.打二、Word自带转PDF方法1.另存点击【文件】【另存为学习22210 深入浅出ExcelVBA杨洋PDF电子版深入浅出Excel VBA 杨洋PDF电子版链接：https://pan.baidu/s/1UhI98OAaV
≥＾≤ 可以在excel工作表中通过宏将一个文件夹中的所有xlsx或类似的表格文件批量转换为pdf文件，遍历每个工作表的每个sheet并逐一转换。SubTO_PDF()On ErrorResumeNe1、首先鼠标右键excel文件，选择使用wps打开。2、然后通过左上角的WPS表格菜单，选择“文件”下的“输出为PDF格式”
需要传两个参数，excel路径和pdf路径。代码可以做成wsf文件，通过C语言或者java调用
