Foxtable(狐表)用户栏目专家坐堂 → excel报表压缩到一页打印的纸张设置代码是什么?


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

主题:excel报表压缩到一页打印的纸张设置代码是什么?

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


加好友 发短信
等级:九尾狐 帖子:2180 积分:13810 威望:0 精华:2 注册:2012/2/25 10:59:00
excel报表压缩到一页打印的纸张设置代码是什么?  发帖心情 Post By:2015/4/23 17:12:00 [只看该作者]

帮助里找到excel报表的纸张设置: 
With Sheet.PrintSetting    '纸张设置
        .PaperKind = 8 '设为A3纸
        .LandScape = True '横向打印
        .MarginLeft = 20 '左右边距设为20毫米
        .MarginRight = 20
        .MarginTop = 15 '上下边距设为15毫米
        .MarginBottom = 15
End With

怎么没有把报表压缩到一页打印的设置?


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/4/23 17:13:00 [只看该作者]

因为报表超出纸张了吧

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


加好友 发短信
等级:九尾狐 帖子:2180 积分:13810 威望:0 精华:2 注册:2012/2/25 10:59:00
  发帖心情 Post By:2015/4/23 17:17:00 [只看该作者]

是的,我用A3横向打印也容不下,只能想办法把它压缩到一页,手动可以设置,代码不知怎么写

图片点击可在新窗口打开查看此主题相关图片如下:搜狗截图20150423171622.png
图片点击可在新窗口打开查看
 

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


加好友 发短信
等级:六尾狐 帖子:1290 积分:9820 威望:0 精华:0 注册:2012/9/19 21:13:00
  发帖心情 Post By:2015/4/23 22:44:00 [只看该作者]

你要把模板的第一列隐藏后,调整列的宽窄,达到你的A3纸的大小即可。

 

你可以生成一个查询表和你的excel一样,再用狐表自带的打印设置打印

 


图片点击可在新窗口打开查看此主题相关图片如下:1.bmp
图片点击可在新窗口打开查看
[此贴子已经被作者于2015/4/23 22:46:58编辑过]

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


加好友 发短信
等级:九尾狐 帖子:2180 积分:13810 威望:0 精华:2 注册:2012/2/25 10:59:00
  发帖心情 Post By:2015/4/24 15:04:00 [只看该作者]

也就是说,只能用可视的方式调整,代码的方式不行吗?

 回到顶部