vba,设置,excel,wps ,页面设置例子
Posted 冷色008
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了vba,设置,excel,wps ,页面设置例子相关的知识,希望对你有一定的参考价值。
Sub yemian()
\'按钮1点击触发 执行下面的命令
With Sheets(1).PageSetup
\'对像是表格1的页面设置的函数PageSetup,下面是函数的属性修改前面加.
.Orientation = xlLandscape
\'= xlLandscape \'设置模向打印模式
\'= xlPortrait \'设置纵向打印模式
.TopMargin = Application.CentimetersToPoints(0.5)
\'=上边距
.BottomMargin = Application.CentimetersToPoints(0.5)
\'=下边距
.LeftMargin = Application.CentimetersToPoints(0.5)
\'=左边距
.RightMargin = Application.CentimetersToPoints(0.5)
\'=右边距
.HeaderMargin = Application.CentimetersToPoints(0.3)
\'=页头边距
.FooterMargin = Application.CentimetersToPoints(0.3)
\'=页脚边距
.LeftHeader = "To: 人力资源部 Date:" & Date
\'=左页眉
.CenterHeader = "&B &22 考勤表格通知单" & vbCrLf & "Requisition"
\'=中页眉
.RightHeader = "安格尔门窗有限公司 2017-11-03"
\'=右页眉
.LeftFooter = ""
\'=左页脚
.CenterFooter = ""
\'=中页脚
.RightFooter = ""
\'=右页脚
End With
End Sub
以上是关于vba,设置,excel,wps ,页面设置例子的主要内容,如果未能解决你的问题,请参考以下文章