我有一个打开文件的宏,对文件执行一些格式化,然后将其另存为新文件。我设置了我的文件类型.xlsx,我打开的文件存储为.xlsx,但是当我保存时,它想将它保存为.xls,然后当我不保存它时它将无法打开作为.xls。我的代码出了什么问题?
我从另一个网站获得了代码保存,因此这可能是问题的一部分。
Sub Main()
'
'// non-related code above...
wBook.SaveAs Filename:=NewFile, _
FileFormat:=xlNormal, _
Password:="", _
WriteResPassword:="", _
ReadOnlyRecommended:=False, _
CreateBackup:=False
Set ActBook = wBook
Workbooks.Open CurrentFile
ActBook.Close
End If
Application.ScreenUpdating = True
End Sub
答案 0 :(得分:8)
尝试将SaveAs.FileFormat
更改为xlOpenXMLWorkbook
wBook.SaveAs Filename:=NewFile, _
FileFormat:=xlOpenXMLWorkbook, ...
您可以获取有关Workbook.SaveAs
方法here (MSDN link)和xlFileFormat枚举here (MSDN link)的更多信息。