以下是引用blackzhu在2010-5-21 13:55:00的发言:
我还想问一个问题,我们EXECL报表模板经过代码输出后我要保存到刚创建的目录中,并且名字要改成同新目录一样的名字+加上报表的名字.我创建目录的代码是:
FileSys.CreateDirectory("D:\Release商业版\CaseStudy\管理项目1\Attachments\文档\XJ")
FileSys.RenameDirectory("D:\Release商业版\CaseStudy\管理项目1\Attachments\文档\XJ",Tables("B").Curren("第一列"))
保存后报表名字如:第一列的一个订单为BEN3777,报表的模板名字为订箱单,那么此报表为BEN3777订箱单.
保存为Excel用:SaveExcel 吧,这样可以吗?
dim bb as string
bb = "D:\Release商业版\CaseStudy\管理项目1\Attachments\文档\XJ\" & Tables("出库明细").Current("出库用途") & "" & "BEN3777.xls " ' ****修正了一下****
Tables("B").SaveExcel(bb,"B",false)
[此贴子已经被作者于2010-5-21 15:29:55编辑过]