Foxtable(狐表)用户栏目专家坐堂 → 想实现这样的功能,给个思路。


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

主题:想实现这样的功能,给个思路。

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/26 10:13:00 [显示全部帖子]

 用线控件画出表格,然后对应放入label和textbox控件即可。
[此贴子已经被作者于2015-1-26 10:13:29编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/26 10:27:00 [显示全部帖子]

 放多个表控件

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/26 10:43:00 [显示全部帖子]


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/26 10:44:00 [显示全部帖子]

以下是引用花开的声音在2015-1-26 10:43:00的发言:

报表设计后,关键是要在窗口中引用并显示,而不是在word或excel中显示。

 

saveHtm或者savePDF以后,在webbrowser里面显示,或者看9楼


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/26 14:04:00 [显示全部帖子]

以下是引用花开的声音在2015-1-26 14:02:00的发言:

哪位老师帮看下。

 

Office版本,必须是在2007以上,才能使用SavePDF方法


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/26 14:08:00 [显示全部帖子]

以下是引用花开的声音在2015-1-26 14:05:00的发言:

我用的就是word2007的

 

 

2007要安装一个东西才能用。

 

http://www.baidu.com/baidu?wd=save+as+pdf&tn=monline_4_dg

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/26 15:23:00 [显示全部帖子]

 只有专业报表有SaveHtm方法。

 

 当然,你也可以用vba另存为htm,但是样式有可能变化。


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/26 15:46:00 [显示全部帖子]

以下是引用花开的声音在2015-1-26 15:39:00的发言:
vba不懂,晓得怎么弄,根据我一楼的代码,给个示例可以不?

 

Dim App As New MSExcel.Application
Dim Wb As MSExcel.Workbook = App.WorkBooks.Open("D:\test01.xls")
Wb.SaveAs(Filename:="D:\test_test.htm", FileFormat:=MSExcel.XlFileFormat.xlHtml)
wb.close
app.quit

 

https://msdn.microsoft.com/zh-cn/library/ff198017%28v=office.15%29.aspx

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/26 17:05:00 [显示全部帖子]

以下是引用花开的声音在2015-1-26 17:01:00的发言:
甜老师,上面的代码好像还差些吧,只是把模板打开,然后保存为htm格式,没有基于模板生成报表的代码。

 

这个你自己加啊,先生成报表,再用vba打开报表另存为


 回到顶部