Início / user-5127541

Subramanian's questions

Martin Hope
Subramanian
Asked: 2025-03-23 21:37:01 +0800 CST
  • 5

Quero inserir o número da página no seguinte formato no centro do rodapé da minha seção. 1/10, 2/10,... 10/10

Tentei o seguinte código, que insere alinhamento 1/10 no lado esquerdo do rodapé.

    Set rngHeader = wdDoc.Sections(1).Footers(wdHeaderFooterPrimary).Range
    rngHeader.Delete
    With rngHeader
        '.InsertAfter Text:="Page "

        '.MoveEnd wdCharacter, 0
        .Fields.Add Range:=.Characters.Last, Type:=wdFieldEmpty, Text:="NUMPAGES", PreserveFormatting:=False

  
        .InsertAfter Text:="  / "
        .Collapse wdCollapseStart
        .Fields.Add Range:=.Characters.Last, Type:=wdFieldEmpty, Text:="PAGE", PreserveFormatting:=False
    End With

Não consigo controlar a inserção de campo especial. Sou novo no Word VBA.

Agradecemos antecipadamente aos especialistas.

-- Subbu

vba