word 用vba如何设置起始页码

有时我们经常要设置插入一些代码,这些代码具有不异反复性,我们可以把它建造当作VBA说话来执行,那么怎么用VBA给WORD设置肇端页码呢?今天小编和大师分享一下。

东西/原料

  • WORD2013

方式/步调

  1. 1

    小编利用的是WORD2013,打开WORD2013并选择空白文档,新建一个空白文档,也可以选择其它的模板打开进行编纂。

  2. 2

    第二步,点击视图——点击宏的下拉箭头选择查看宏——在宏名那边输入:插入页码——建立。

  3. 3

    第三步,点击建立后就会直接进入到VBA编纂页面,而且已经按上一步的设置编纂好名称和提醒信息。在明灭光标那边输入如下编码:

     With ActiveDocument.Sections(1).Footers(wdHeaderFooterPrimary)      Set rng = .Range      rng.Text = "第 "      rng.Collapse wdCollapseEnd      ActiveDocument.Fields.Add rng, wdFieldPage, "Page"      Set rng = .Range      rng.Collapse wdCollapseEnd      rng.Text = " 页 / 共 "      rng.Collapse wdCollapseEnd      ActiveDocument.Fields.Add rng, wdFieldNumPages, "Pages"      Set rng = .Range      rng.Collapse wdCollapseEnd      rng.Text = " 页 "      .Range.Fields.Update      .Range.ParagraphFormat.Alignment = wdAlignParagraphCenterEnd With

  4. 4

    第四步,设置代码之后,在VBA编纂器那边点击保留——接着点击运行——选择:运行子过程/用户窗体。这样就可以运行代码。运行代码后,WORD编纂页面就主动设置了页码了。

  5. 5

    第五步,办理宏位置:封闭VBA编纂器,在WORD本家儿页面那边点击视图——宏——查看宏——然后在宏的位置那边选择宏的具体位置,如在文档还在模板等。也可以点击办理器进行设置。

  6. 6

    最后,你可以点击视图——宏——录制宏——输入宏名——点击确定——然后在编纂页面就按步调操作插入页码,这样就可以把代码录制下来,然后稍微点窜一下就可以了。

注重事项

  • 但愿能帮忙到你
  • 发表于 2019-04-08 22:17
  • 阅读 ( 869 )
  • 分类:其他类型

你可能感兴趣的文章

相关问题

0 条评论

请先 登录 后评论
联系我们:uytrv@hotmail.com 问答工具