Foxtable(狐表)用户栏目专家坐堂 → Excel报表


  共有1713人关注过本帖树形打印复制链接

主题:Excel报表

帅哥哟,离线,有人找我吗?
mamuaiqing
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:824 积分:6294 威望:0 精华:0 注册:2012/3/1 3:17:00
Excel报表  发帖心情 Post By:2016/10/9 23:48:00 [只看该作者]

Excel报表当中保存工作薄路径代码如下

Dim khmc As String = "张三"

Dim rq1 As Date = #01/01/2016#

Dim rq2 As Date = #02/02/2016#

khmc = khmc & rq1 & "至" & rq2 & "对账单.xls"
Book.Save(ProjectPath & "对账单\" & khmc)

 

在XP系统生成的文件名为"张三2016-01-01至2016-02-02对账单.xls",这个正常

WIN7系统生成的文件名为:对账单\张三\2016\01\01\2016\02\02\对账单.xls,文件名为"对账单.xls",其它的变为路径了,请教老师怎么回事


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/10 9:48:00 [只看该作者]

khmc = khmc & Format(rq1,"yyyy-MM-dd") & "至" & Format(rq2,"yyyy-MM-dd") & "对账单.xls"

不同系统默认日期格式不一样

 回到顶部