以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  Excel报表另存文件名公式?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=175535)

--  作者:wusim
--  发布时间:2022/3/9 7:17:00
--  Excel报表另存文件名公式?
Dim Book As New XLS.Book(ProjectPath & "Attachments\\平台导出数据.xls") \'打开模板
Dim fl As String = "d:\\use\\平台\\导出数据.xls"
Book.Build() \'生成报表
Book.Save(fl)
我想把另存时文件加上导出日期怎样改公式? 原来导出“导出数据.xls” 想改为“0309导出数据.xls”   0309表示导出时的系统日期

--  作者:有点蓝
--  发布时间:2022/3/9 8:39:00
--  
Dim fl As String = "d:\\use\\平台\\" & format(date.today,"MMdd") & "导出数据.xls"