带宏工作簿另存成不带宏工作簿

1、 ThisWorkbook.Sheets(Array("挢旗扦渌;审核要点", "管控"荑樊综鲶, "投资分解表", "任务书文号", "2020年项目", "2021年项目")).Copy ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\汇总后.xlsx" 如上我们先对需要保存的SHEET进行复制，再进行另存为，另存为文件的后缀为xlsx，这样就能得到不带宏的工作簿了。