Foxtable(狐表)用户栏目专家坐堂 → 尴尬的excel报表打印,寻求有经历的狐友高手解套


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

主题:尴尬的excel报表打印,寻求有经历的狐友高手解套

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


加好友 发短信
等级:七尾狐 帖子:1684 积分:16374 威望:0 精华:0 注册:2013/7/31 13:03:00
  发帖心情 Post By:2020/5/15 11:10:00 [只看该作者]

二单得打印结果:


图片点击可在新窗口打开查看此主题相关图片如下:微信图片_打印结果.jpg
图片点击可在新窗口打开查看



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


加好友 发短信
等级:七尾狐 帖子:1684 积分:16374 威望:0 精华:0 注册:2013/7/31 13:03:00
  发帖心情 Post By:2020/5/15 11:13:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:微信图片_202005151.jpg
图片点击可在新窗口打开查看

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


加好友 发短信
等级:七尾狐 帖子:1684 积分:16374 威望:0 精华:0 注册:2013/7/31 13:03:00
  发帖心情 Post By:2020/5/15 11:40:00 [只看该作者]


有点甜项目测试报告:

图片点击可在新窗口打开查看此主题相关图片如下:snipaste_有点甜1.png
图片点击可在新窗口打开查看


图片点击可在新窗口打开查看此主题相关图片如下:snipaste_有点甜2.png
图片点击可在新窗口打开查看


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


加好友 发短信
等级:超级版主 帖子:106732 积分:542855 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/5/15 12:09:00 [只看该作者]

把dll复制到foxtable的安装目录。另外打印机是自动获取的,不需要手工添加

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


加好友 发短信
等级:七尾狐 帖子:1684 积分:16374 威望:0 精华:0 注册:2013/7/31 13:03:00
  发帖心情 Post By:2020/5/15 13:14:00 [只看该作者]

自定义纸张写在代码中吗?
Dim cps As new CustomPaperSize.CustomPaperSize()
cps.SetPrintForm(e.Form.Controls("ComboBox1").Text,"我新增的自定义纸张", 100*38, 100*27)
msgbox("添加成功")

改写这个吗:100*38, 100*27?
为什么写两个?

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


加好友 发短信
等级:超级版主 帖子:106732 积分:542855 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/5/15 13:36:00 [只看该作者]

SetPrintForm(打印机名称, 自定义纸张名称, 纸张宽, 纸张高)

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


加好友 发短信
等级:七尾狐 帖子:1684 积分:16374 威望:0 精华:0 注册:2013/7/31 13:03:00
  发帖心情 Post By:2020/5/15 16:25:00 [只看该作者]

这个也没有搞成,呜呼。
 不论设置页面是240*140 还是240*280 得到的paperkind都是146.
写入代码
Dim Book As New XLS.Book
Dim
Sheet As XLS.Sheet = Book.Sheets(0)
With
Sheet.PrintSetting
    .PaperKind = 146
 
'
不起什么作用。呜呼。

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


加好友 发短信
等级:超级版主 帖子:106732 积分:542855 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/5/15 16:47:00 [只看该作者]

那就没有办法了,说明这个打印机不支持自定义的PaperKind 

 回到顶部
总数 18 上一页 1 2