Foxtable(狐表)用户栏目专家坐堂 → word报表的问题


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

主题:word报表的问题

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


加好友 发短信
等级:超级版主 帖子:106209 积分:540168 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/2 9:18:00 [显示全部帖子]

麻烦下次发代码直接贴出来即可,不要发这种有行号的代码,看着费劲。

18 wrt.ReplaceOne("[试题]",st.replace(chr(10),"") )
wrt.ReplaceOne("[试题2]","[试题3]")
19 Dim img As Image = GetImage(wjm)
20 If img.width>400 Then
21 wrt.ReplaceWithImage("[试题3]",wjm,400,400*img.height/img.width)
22 Else
23 wrt.ReplaceWithImage("[试题3]",wjm,img.width,img.height)
24 End If
25 Else

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


加好友 发短信
等级:超级版主 帖子:106209 积分:540168 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/2 16:10:00 [显示全部帖子]

不要画蛇添足,就按照2楼使用即可,2个名称就够了"[试题2]","[试题3]"

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


加好友 发短信
等级:超级版主 帖子:106209 积分:540168 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/2 17:09:00 [显示全部帖子]

试了,这个确实没有办法。建议还是使用execl报表吧。或者专业报表

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


加好友 发短信
等级:超级版主 帖子:106209 积分:540168 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/12/2 20:22:00 [显示全部帖子]

专业报表无法生成word。

模板引用图片只能固定尺寸。

每个功能都有自己的优缺点。

如果说一点要输出word文档,只能是学学word vba,自己完全使用代码填充数据了。

 回到顶部