怎样使用VBA页面设置?
来源:网络收集 点击: 时间:2024-04-08首先在开发工具中打开VBA编辑器

在单元格区域当中输入一些内容作为例子

在VBA编辑器中插入模块

在模块当中输入如下代码,然后运行
Sub页面设置() With ActiveSheet.PageSetup .PrintArea=ActiveSheet.UsedRange.Address 打印区域 .PrintTitleRows=$1:$3 行标题 .PrintTitleColumns= 列标题 .LeftMargin=Application.InchesToPoints(0.2) 设置左边距的大小 .RightMargin=Application.InchesToPoints(0.2) 设置右边距的大小 .TopMargin=Application.InchesToPoints(0.5) 设置上边距的大小 .BottomMargin=Application.InchesToPoints(0.5)设置底端边距的大小 .HeaderMargin=Application.InchesToPoints(0.2) 设置页面顶端到页眉的距离 .FooterMargin=Application.InchesToPoints(0.2) 设置页脚到页面底端的距离 .PrintComments=xlPrintNoComments 不打印批注 .CenterHorizontally=True 垂直居中 .CenterVertically=True 水平居中 .Orientation=xlPortrait 页面方向:xlPortrait为纵向,xlLandscape为横向 .PaperSize=xlPaperA4 纸张大小为A4 .Order=xlDownThenOver 先行后列方式打印 .Zoom=100 不进行缩放End WithEnd Sub

用快捷键Alt+F8调出运行宏窗口,然后单击“执行”按钮,工作表已按需求做好打印设置

智能手机助理给我们的生活带来了极大的便利!
版权声明:
1、本文系转载,版权归原作者所有,旨在传递信息,不代表看本站的观点和立场。
2、本站仅提供信息发布平台,不承担相关法律责任。
3、若侵犯您的版权或隐私,请联系本站管理员删除。
4、文章链接:http://www.ff371.cn/art_462504.html