Foxtable(狐表)用户栏目专家坐堂 → 生成xls报表


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

主题:生成xls报表

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


加好友 发短信
等级:三尾狐 帖子:698 积分:5612 威望:0 精华:0 注册:2013/4/9 6:59:00
生成xls报表  发帖心情 Post By:2019/1/14 15:45:00 [只看该作者]

生成word报表的代码是这样:
Dim tm As String  = "D:\My Documents\Foxtable项目\体检信息\Attachments\"&Tables("表A").Current("表B") &".doc" '指定模板文件
Dim fl As String = "D:\My Documents\Foxtable项目\体检信息\Reports\"&Tables("表A").Current("表B")&".doc"  '指定目标文件
Dim wrt As New WordReport(Tables("表A"),tm,fl) '定义一个WordReport
wrt.Build() '逐行生成报表
wrt.Show() '显示报表

实现按照单元格内容选择同名doc报表,
现在想实现按照单元格内容选择同名xls报表。
代码把word改成excel就可以了吗?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/1/14 16:08:00 [只看该作者]


 回到顶部