Excel vba 如何新建excel工作薄

来源:百度知道 编辑:UC知道 时间:2024/06/15 17:53:20
如题,如何通过VBA 在特定路径下(比如:D:\)创建一个名字为1111111.xls的EXCEL工作薄?

谢谢高手指教!!

Sub SAVE1()
Workbooks.Add
ActiveWorkbook.SaveAs _
Filename:="D:\1111111.xls", _
FileFormat:=xlNormal, _
Password:="", _
WriteResPassword:="", _
ReadOnlyRecommended:=False, _
CreateBackup:=False
End Sub

使用语句
Workbooks.Add.SaveAs "1111111.xls"