首页 > 其他分享 > WORD VBA 设置页面

WORD VBA 设置页面

时间:2022-11-28 00:34:18浏览次数:39  
标签:VBA False CentimetersToPoints End 设置 WORD 页面

Sub 设置页面()
'
' 设置页面和页码 宏
'
'
    With Selection.PageSetup
        .LineNumbering.Active = False
        .Orientation = wdOrientPortrait
        .TopMargin = CentimetersToPoints(2.54)
        .BottomMargin = CentimetersToPoints(2.54)
        .LeftMargin = CentimetersToPoints(1.9)
        .RightMargin = CentimetersToPoints(1.9)
        .Gutter = CentimetersToPoints(0)
        .HeaderDistance = CentimetersToPoints(1.5)
        .FooterDistance = CentimetersToPoints(1.75)
        .PageWidth = CentimetersToPoints(21)
        .PageHeight = CentimetersToPoints(29.7)
        .FirstPageTray = wdPrinterDefaultBin
        .OtherPagesTray = wdPrinterDefaultBin
        .SectionStart = wdSectionNewPage
        .OddAndEvenPagesHeaderFooter = False
        .DifferentFirstPageHeaderFooter = False
        .VerticalAlignment = wdAlignVerticalTop
        .SuppressEndnotes = False
        .MirrorMargins = False
        .TwoPagesOnOne = False
        .BookFoldPrinting = False
        .BookFoldRevPrinting = False
        .BookFoldPrintingSheets = 1
        .GutterPos = wdGutterPosLeft
        .LinesPage = 44
        .LayoutMode = wdLayoutModeLineGrid
    End With
    
End Sub

 

标签:VBA,False,CentimetersToPoints,End,设置,WORD,页面
From: https://www.cnblogs.com/sharer/p/16931121.html

相关文章

  • Java: How To Count Words
    publicclassMain{publicstaticvoidmain(String[]args){Stringwords="OneTwoThreeFour";intcountWords=words.split("\\s").length;Sy......
  • WordPress程序备受喜爱的原因:十八般武艺
    众所周知,WordPress是个功能强大且颇受欢迎的开源博客平台。WordPress友好的界面和操作的简便性为它带来了无数用户,WordPress甚至可以被作为内容发布系统(CMS)来使用。当你尝试......
  • openEuler中基于LAMP部署WordPress
    目录openEuler中基于LAMP部署WordPress配置openEuler安装LAMP安装wordpress遇到的问题与解决方案特别感谢openEuler中基于LAMP部署WordPress本文环境基于华为云的弹性云......
  • PDF中的某个图或表想几乎无损的插入ppt或者word里的方法
    要使用ps打开pdf并另存为tiff或者,其他方法存储的tiff可能不如这种方法高清0.参考方法网址:PS导出符合投稿规范的图片1.pdf可能很多页,一页内有很多图像文字,要先使用福昕......
  • 『题解』Codeforces 1743A Password
    Problem现有\(4\)位密码,满足以下条件:给定数位的集合\(S\),密码中没有用到这些数位。密码中恰好包含两个数位,每个数位出现了两次。求符合条件的密码个数。Solution......
  • vue 列表页面点击编辑页面传值
    props分为三种形式props为对象props为布尔值,这种只能接收params动态路由的参数props为函数,可以接收query和params参数(推荐)importVuefrom'vue'importVueRoute......
  • wordpress代码实现相关文章的几种方法
    我们在制作wordpress主题的时候经常会为文章模板添加一些相关文章的功能丰富,他们有的时候出现在侧栏,有的时候出现在文章的底部相关文章这块,当然WordPress相关文章的插件也......
  • VBA工作薄引用 方法
    工作簿的引用方法引用不同的工作簿有如下的方法:1、使用工作簿名称工作簿名称是指Excel文件的文件名,可以使用Workbooks集合引用方式来引用工作簿。Subtest()Msg......
  • VBA 技巧二
    PublicSub技巧()'保存并关闭工作薄DimwbAsWorkbookSetwb=ThisWorkbook'可指定任意工作簿wb.Closesavechanges:=FalseSetwb=Nothing......
  • 修改Word默认模板
    修改Word默认模板文档操作系统:Windows10Word版本:2019一、创建Word新文档原理在新建Word文档时,Word会根据“用户模板”路径,搜寻路径下名为Normal.dotm的文件,即Word的默......