大众计算机学习网欢迎诸位!收藏本站注 册登 陆
常用教程:基础知识网络知识操作系统WPS网页制作数据库算法网页成功之路网络安全最新技术古典mid流行midmid背景下载中心
您现在的位置:首页 > 教程 > 文章页

vba设置WORD页眉页脚

Admin | 2016-5-29 10:07:32 | ReadNums | 2246 | 标签 Word教程 | 打印本页
     

  使用下面的代码,可以设置WORD里面的页眉和页脚的内容。

  Dim i As Long

  For i = 1 To ActiveDocument.Sections.Count

      With ActiveDocument.Sections(i)

          .Headers(wdHeaderFooterPrimary).Range.Text = "页眉内容动态添加"

          .Footers(wdHeaderFooterPrimary).Range.Text = "页脚内容在这里哦"

          MsgBox .Headers(wdHeaderFooterPrimary).Range.Text

      End With

  Next

  最后一句,MsgBox .Headers(wdHeaderFooterPrimary).Range.Text,作用是弹出页眉的内容。


问题未解决:在线咨询我要在线咨询问题

网友评论

(访客)
内容实用原创,讲得很好。
20xx年x月x日
(站长)
有问题请在线咨询。
20xx年x月x日