- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]如何设置Excel文件中的页面设置缩放比例？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=186617)
-- 发布时间：2023/5/16 8:40:00
-- [求助]如何设置Excel文件中的页面设置缩放比例？
此主题相关图片如下：qq图片20230516083611.png
-- 发布时间：2023/5/16 8:42:00
--
http://www.foxtable.com/webhelp/topics/2121.htm
.PrintHeadings = True\'打印行号和列标
.PrintGridlines = True \'打印网格线
\'缩放打印
.Zoom = False\'以下设置将缩印在一页内
.FitToPagesWide = 1 \'按照1页的宽度打印
.FitToPagesTall = 1 \'按照1页的高度打印
End With
App.Visible = True
Ws.PrintPreview
App.Quit
补充说明，Zoom是用于设置打印工作表时的缩放比例，数值在10和400之间。如果本属性设为False，则由FitToPagesWide属性和FitToPagesTall属性的设定值对工作表的缩放进行控制。
.PrintGridlines = True \'打印网格线
\'缩放打印
.Zoom = False\'以下设置将缩印在一页内
.FitToPagesWide = 1 \'按照1页的宽度打印
.FitToPagesTall = 1 \'按照1页的高度打印
End With
App.Visible = True
Ws.PrintPreview
App.Quit
补充说明，Zoom是用于设置打印工作表时的缩放比例，数值在10和400之间。如果本属性设为False，则由FitToPagesWide属性和FitToPagesTall属性的设定值对工作表的缩放进行控制。
-- 发布时间：2023/5/16 9:20:00
--
end with 前缀是什么啊？ 帮助文件里没有介绍
-- 发布时间：2023/5/16 9:23:00
--
帮助里肯定有啊，都是帮助里复制的，里面看【打印输出】