相关文章推荐
谦逊的板栗  ·  c++ - In CMake, how ...·  1 年前    · 
重感情的葡萄酒  ·  [Solved] Error ...·  1 年前    · 
另类的地瓜  ·  VBA入门知识 - 百度文库·  2 年前    · 
悲伤的山羊  ·  pymysql.err.Operationa ...·  2 年前    · 

Excel利用vba另存为各种常用格式

请结合其他语句使用。

另存为带宏的工作簿

ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\" & "文件名", FileFormat:=xlOpenXMLWorkbookMacroEnabled

另存为xlsx的工作簿

ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\" & "文件名", FileFormat:=xlWorkbookNormal

另存为xls的工作簿

'ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\" & "文件名", FileFormat:=xlExcel8

另存为PDF

ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:=ThisWorkbook.Path & "\" & "文件名"

编辑于 2019-09-21 02:55