☰

Microsoft Publisher 2016에는 [x/y] 페이지 번호 매기기가 없습니다. 이를 달성하는 방법은 무엇입니까?

tag-icon • tag-icon microsoft-office vba macros microsoft-publisher
Microsoft Publisher 2016에는 [x/y] 페이지 번호 매기기가 없습니다. 이를 달성하는 방법은 무엇입니까?

간단히 말해서 우리 사무실에서는 교육 문서로 MS Word를 사용해 왔습니다. 많은 수의 사진을 삽입하기 시작하면서 이로 인해 Word의 서식이 가장 실망스러운 방식으로 손상되었습니다. 저는 아이디어가 넘쳤기 때문에 텍스트와 이미지를 쉽게 관리할 수 있는 Publisher로 옮기자고 제안했습니다.

물론 우리의 기술 작성자는 즉시 장애물에 부딪혔습니다. MS Word에서는 페이지 머리글에 현재 페이지 수와 전체 페이지 수 모두 자동으로 번호를 매길 수 있습니다. 예를 들어 " 1/3 페이지 "

MS Publisher는 페이지 자동 번호 매기기만 지원합니다. 나는 온라인을 둘러보았고 바로 이 문제에 대한 간단한 VBA 매크로를 찾았습니다.

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

불필요한 텍스트 상자가 생성되는 것을 볼 수 있습니다. VBA 매크로를 사용하여 내가 선택한 문서에 총 페이지 수를 자동으로 삽입하는 것은 불가능합니까?

불행히도 나는 이것을 구현하는 방법을 전혀 모릅니다. 마이크로소프트 측의 큰 실수인 것 같습니다.

지금은 마지막 페이지로 이동하여 페이지 번호를 가져오고 마스터에서 "of" 번호를 직접 편집하는 것이 계획입니다. 정말 어색해요.

관련 정보