Microsoft Publisher 2016 carece de numeración de páginas [x de y]: ¿cómo lograrlo?

Question

En pocas palabras, nuestra oficina ha estado utilizando MS Word para su documentación de capacitación. Cuando comencé a insertar una gran cantidad de fotografías, esto provocó que el formato de Word se rompiera de la manera más frustrante posible. Como tengo muchas ideas, sugerí que nos mudáramos a Publisher, lo que facilita la administración de texto e imágenes.

Por supuesto, nuestro redactor técnico se topó con un obstáculo de inmediato. MS Word permite numerar los encabezados de las páginas automáticamente, tanto el número de la página actual como el número total de páginas. Por ejemplo "Página 1 de 3"

MS Publisher sólo admite la numeración automática de páginas, nada más. Busqué en línea y encontré una breve macro de VBA para este mismo 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

Puedo ver que se está creando un cuadro de texto, lo cual parece innecesario. ¿No sería posible utilizar VBA Macro para simplemente insertar el número total de páginas automáticamente en el documento que selecciono?

Desafortunadamente, no tengo idea de cómo implementar esto. Parece ser un descuido importante por parte de Microsoft.

Por ahora, el plan es saltar a la última página, obtener el número de página y editar el número "de" en el maestro a mano. Súper incómodo.