![Microsoft Publisher 2016 缺少 [x of y] 頁碼 - 如何實現此目的?](https://rvso.com/image/1555413/Microsoft%20Publisher%202016%20%E7%BC%BA%E5%B0%91%20%5Bx%20of%20y%5D%20%E9%A0%81%E7%A2%BC%20-%20%E5%A6%82%E4%BD%95%E5%AF%A6%E7%8F%BE%E6%AD%A4%E7%9B%AE%E7%9A%84%EF%BC%9F.png)
簡而言之,我們的辦公室一直使用 MS Word 來製作培訓文件。當我開始插入大量照片時,這導致 Word 的格式以最令人沮喪的方式崩潰。由於我充滿了想法,我建議我們轉向 Publisher,這使得管理文字和圖像變得容易。
當然,我們的技術作家立即遇到了障礙。 MS Word 允許自動對頁首進行編號,包括目前頁數和總頁數。例如“第 1 頁,共 3 頁”
MS Publisher 僅支援頁面自動編號,僅此而已。我上網查了一下,發現了一個簡短的 VBA 巨集來解決這個問題:
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:=710, Top:=580, Width:=80, Height:=20) _
.TextFrame.TextRange.InsertAfter NewText:="Page " _
& strPageNumber & " of " & .Parent.Count & "."
End With
Next x
我可以看到正在創建一個文字框,這似乎沒有必要。是否無法使用 VBA 巨集在我選擇的文件中自動插入總頁數?
不幸的是,我不知道如何實現這一點。這似乎確實是微軟的重大疏失。
目前,計劃是跳到最後一頁,獲取頁碼並手動編輯母版中的“of”編號。超尷尬。