另存为xlsx文件

工具对于大量报告的生成,可以使用工具打开模板文件,添加数据、图片的信息后,另存为新的报告,然后关闭并不保存模板。


’打开模板时,将打开动作设为隐藏

'ActiveWorkbook.viseble = False '隐藏打开文件的动作


’添加具体操作。。。



'1.另存为文件夹名称对应的报告,51代表文件类型为.xlsx,例:"Site Design Report_B00459.xlsx"
ActiveWorkbook.SaveAs ThisWorkbook.Path & "\Site Design Report_" & mfolder.Name, 51


'2.这种saveas后的.xlsx副本不能打开,暂弃用
'ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\Site Design Report_" & mfolder.Name & ".xlsx", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False


'ActiveWorkbook.viseble = True  '显示文件,恢复原设置
ActiveWorkbook.Close False  '不保存关闭模板,,True表示保存关闭

没有更多推荐了,返回首页