点击“开发工具”,点击“WPS宏编辑器”,点击“插入”——“模块”,在“Module1”中粘贴以下代码,点击运行按钮即可。
function SH_TO_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()
}
}
创作者俱乐部成员
创作者俱乐部成员
WPS函数专家