![Publisher 2016 第 1 页,共 10 页](https://linux22.com/image/1524502/Publisher%202016%20%E7%AC%AC%201%20%E9%A1%B5%EF%BC%8C%E5%85%B1%2010%20%E9%A1%B5.png)
我正在尝试在发布商中添加类似第 1 页,共 10 页在 Publisher 的标题中。如果我查看主页,我只会看到一个“插入页码”按钮,它会显示当前页码。没有显示总页数的内容。我如何添加类似第 1 页,共 10 页在 Publisher 文档的标题中?
答案1
这个问题目前还没有得到答复,所以我将从 Publisher 2010 的角度来回答。2010 中没有 Word 中的总页数,但可以运行宏:
Sub NumberT()
Dim strPageNumber As String
Dim x As Integer
For x = 1 To Pages.Count
With ActiveDocument.Pages(x)
strPageNumber = .PageNumber
.Shapes.AddTextbox(Orientation:=pbTextOrientationHorizontal, _
Left:=490, Top:=50, Width:=80, Height:=20) _
.TextFrame.TextRange.InsertAfter NewText:="Page " _
& strPageNumber & " of " & .Parent.Count & " "
End With
Next x
End Sub
我根据来自的一篇文章修改了此代码在页码后添加页数在 Microsoft 论坛上。您需要根据页边距和字体大小更改“左”和“上”的值。正如所写,此代码将页码放在具有 1 英寸边距的纵向信函页面的右上角。
这种解决方法绝对是最后的手段,因为它会在每一页上创建带有硬编码页面信息的文本框,最好在所有编辑结束时运行。在重新运行宏之前,需要手动删除包含编号的文本框。
答案2
如果您知道总页数,您可以自己动手做一个。这样想 - 唯一的变量是您当前所在的页面,总数永远不会改变。所以以下流程的第 2 步处理唯一的变量。仅供参考,这将在页眉、页脚或正文中起作用:
- 只需输入“Page”然后留一个空格
- 使用“插入”选项卡上的“页码”工具 - 由于您要在页眉/页脚/正文中键入内容,因此只需使用下拉菜单底部第二个“在当前文本框中插入”功能或者单击页码工具后,只需按“i”即可。
- 现在您已插入唯一的变量,只需在其中输入一个空格并输入“of”,然后输入总页数。由于总页数永远不会改变,因此每页都相同并不重要。
您的最终产品看起来会像这样 - 第 10 页(或您的总数 - 使用插入页码工具时会出现“#”)
只需单击即可将其应用于所有页面,保存您的文档,并为您的惊人效果而感到惊讶。