请教高手如何每天定期将数据报表自动发送至指定文件夹?并且自动将EXCELL文档以日期命名,谢谢!虽然可以导出数据报表,但是需要手动,请教请教!!
最佳答案
做一个Excel模板,可以存放在电脑任何路径,比如D:\model.xls盘,然后用脚本做:添加一个每日的周期定时期,到时间把数据填进去,做后把该文件复制到你指定的路径(D:\Report)下就可以了,复制脚本如下:
Dim fso,myfile,daystr,dstr,fname
dstr = FormatDateTime(Date,2)
fname="D:\report\" + dstr + ".xls"
Set fso = CreateObject("scripting.FileSystemObject")
Set MyFile = fso.GetFile("D:\model.xls")
MyFile.Copy(fname)
提问者对于答案的评价:
谢谢
原创文章,作者:more0621,如若转载,请注明出处:https://www.zhaoplc.com/plc270665.html