O Microsoft Publisher 2016 não possui numeração de páginas [x de y] - Como conseguir isso?

Question

Simplificando, nosso escritório tem usado o MS Word para a documentação de treinamento. Quando comecei a inserir um grande número de fotos, isso fez com que a formatação do Word quebrasse da maneira mais frustrante possível. Como estou cheio de ideias, sugeri que mudássemos para o Publisher, o que facilita o gerenciamento de textos e imagens.

É claro que nosso redator técnico encontrou um obstáculo imediatamente. O MS Word permite que os cabeçalhos das páginas sejam numerados automaticamente, tanto o número da página atual quanto o número total de páginas. Por exemplo "Página 1 de 3"

O MS Publisher suporta apenas a numeração automática de páginas, nada mais. Procurei on-line e encontrei uma breve macro VBA para esse mesmo problema:

https://answers.microsoft.com/en-us/msoffice/forum/msoffice_other-mso_other-mso_2010/display-page-numbers-in-ms-publisher-2010/499026db-0f47-46a8-8f96-6ee0b0ca7d46

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

Percebo que uma caixa de texto está sendo criada, o que parece desnecessário. Não seria possível utilizar o VBA Macro apenas para inserir automaticamente o número total de páginas no documento onde eu seleciono?

Infelizmente, não tenho ideia de como implementar isso. Parece ser um grande descuido por parte da Microsoft.

Por enquanto, o plano é pular para a última página, obter o número da página e editar manualmente o número “de” no mestre. Muito estranho.