用VBS创建Excel后，打开时却提示“您尝试打开的文件 的格式与文件扩展名指定的格式不一致”

使用此VBS代码创建Excel：

Set oexcel=CreateObject("excel.application")
oexcel.Workbooks.Add()
oexcel.ActiveWorkbook.SaveAs("d:\xx.xls")
'
oexcel.Quit
Set oexcel=Nothing

但创建出的Excel打开时会提示“您尝试打开的文件 的格式与文件扩展名指定的格式不一致”。

虽然点确定后也可以使用。

但是..用户体验感太差..

解决方法：把xls改为xlsx即可..

即：

Set oexcel=CreateObject("excel.application")
oexcel.Workbooks.Add()
oexcel.ActiveWorkbook.SaveAs("d:\xx.xlsx")
'
oexcel.Quit
Set oexcel=Nothing

由VBS群自称“有人”的好心先生提供。

....他觉得这是常识，不值得一提。