你的问题用WPS宏即可解决，以下是代码，你把它粘贴到开发工具，宏编辑器里面即可。
function SH_TO_PDF(){ \\批量将工作表导出为PDF，并以工作表名作为文件名
let p='c:\\aa\\' \\将PDF存放在C盘aa文件夹下
let wb = ThisWorkbook
for(i=1;i<=wb.Sheets.Count;i++){
let nm=wb.Sheets.Item(i).Name
wb.Sheets.Item(i).Copy()
let nb=ActiveWorkbook
nb.ExportAsFixedFormat(xlTypePDF,p+nm+'.pdf')
nb.Close(false)
DoEvents()
}
}
Lv.2潜力创作者