none
WORD - Alterar fonte somente de linhas pares RRS feed

  • Pergunta

  • Existe recurso no WORD para alter o tamanho da fonte apenas das linhas pares ou das linhas ímpares ? O meu word é word 7

    Obrigado.   Obs.: Selecionei o Forum VBA mas nao sei o que é isto. Sou apenas usuario.

    quarta-feira, 3 de junho de 2015 23:31

Respostas

  • Você selecionou o fórum correto, bem vindo.

    Sub Main()
        Dim oParagraph As Paragraph
        Dim i As Long
        Dim doc As Document
        
        Set doc = ActiveDocument
        
        For i = doc.Paragraphs.Count To 1 Step -1
            'use 0 para pares e 1 para ímpares
            If i Mod 2 = 0 Then
                doc.Paragraphs(i).Range.Font.Size = 6
            End If
        Next i
        
    End Sub


    Felipe Costa Gualberto - http://www.ambienteoffice.com.br

    quinta-feira, 4 de junho de 2015 14:51
    Moderador