使用此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群自称“有人”的好心先生提供。
....他觉得这是常识,不值得一提。
版权声明:本文为博主原创文章,未经博主允许不得转载。
时间: 2024-10-10 02:15:58