如何用vba设置word文档页眉页脚的首页不同和奇偶页不同? | 您所在的位置:网站首页 › 如何设置文档页眉页脚奇偶页不同 › 如何用vba设置word文档页眉页脚的首页不同和奇偶页不同? |
如何用vba设置word文档页眉页脚的首页不同和奇偶页不同?
2019年6月28日
作者:水星Excel
7,947 次浏览
暂无评论
要用vba设置word文档页眉页脚的首页不同和奇偶页不同,需要用到PageSetup对象。 要设置页眉页脚的首页不同,设置PageSetup对象的DifferentFirstPageHeaderFooter属性。 要设置页眉页脚的奇偶页不同,用PageSetup对象的OddAndEvenPagesHeaderFooter属性。 由于不同的节可以有不同的页眉页脚,所以要设置整个文档的页眉页脚的首页不同和奇偶页不同,要遍历所有的节。 以下代码遍历了所有节,然后设置所有节的页眉页脚的首页不同和奇偶页不同: Sub QQ1722187970() Dim oSection As Section For Each oSection In Word.ActiveDocument.Sections With oSection.PageSetup .DifferentFirstPageHeaderFooter = True .OddAndEvenPagesHeaderFooter = True End With Next End Sub 其它相关文章推荐:如何用vba给word文档的奇偶页设置页码?如何用vba给word文档添加页码?如何用vba删除word文档中的所有页码?如何用vba设置word的页码格式?如何用vba单独设置word页面的纸张方向?如何用vba遍历word文档的页眉页脚? 分类 : VBA , WORD VBA 标签 : DifferentFirstPageHeaderFooter , OddAndEvenPagesHeaderFooter , 奇偶页不同 , 节 , 页眉 , 页脚 , 首页不同声明: 本站文章均属原创,未经作者同意必须保留此段声明,且在文章页面明显位置给出原文链接,否则视为侵权。如果想要每天都收到本站的技术文章推送,可以微信搜索公众号:水星Excel或者Excel_Office关注。其它事宜请加QQ:1722187970 或微信号:xycgenius 联系。 |
CopyRight 2018-2019 实验室设备网 版权所有 |