Dica: outros idiomas são traduzidos pelo Google. Você pode visitar o English versão deste link.
Entrar
x
or
x
x
Registre-se
x

or

Como encontrar e destacar parágrafos duplicados no documento do Word?

Suponhamos que você tenha um grande documento do Word que possa ter centenas de páginas. Agora, você quer verificar se há parágrafos duplicados e, em seguida, destacar para torná-los pendentes, para que você possa lidar com as frases duplicadas. Como você pode encontrar e destacar os parágrafos duplicados de maneira rápida e fácil no documento do Word?

Encontrar e realçar os parágrafos duplicados no documento do Word com o código VBA


Encontrar e realçar os parágrafos duplicados no documento do Word com o código VBA

Para encontrar e destacar os parágrafos duplicados em um documento do Word, o seguinte código VBA pode fazer um favor a você, por favor, faça o seguinte:

1. Mantenha pressionado o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.

2. E então, clique em inserção > Módulo, copie e cole o código abaixo no módulo em branco aberto:

Código VBA: Encontre e destaque os parágrafos duplicados no documento do Word:

Sub highlightdup()
    Dim I, J As Long
    Dim xRngFind, xRng As Range
    Dim xStrFind, xStr As String
    Options.DefaultHighlightColorIndex = wdYellow
    Application.ScreenUpdating = False
    With ActiveDocument
        For I = 1 To .Paragraphs.Count - 1
            Set xRngFind = .Paragraphs(I).Range
            If xRngFind.HighlightColorIndex <> wdYellow Then
                For J = I + 1 To .Paragraphs.Count
                    Set xRng = .Paragraphs(J).Range
                    If xRngFind.Text = xRng.Text Then
                        xRngFind.HighlightColorIndex = wdBrightGreen
                        xRng.HighlightColorIndex = wdYellow
                    End If
                Next
            End If
        Next
    End With
End Sub

3. E, em seguida, pressione F5 Para executar este código, todas as frases duplicadas são destacadas de uma só vez, os primeiros parágrafos duplicados exibidos são destacados com a cor verde, e outras duplicatas são destacadas com a cor amarela, veja a captura de tela:

doc destacar dup sentenças 1



Ferramentas recomendadas de produtividade de palavras

Kutools for Word - Mais do que 100 Recursos avançados para Word, economize seu tempo 50%

  • Operações complicadas e repetidas podem ser feitas em processamento único em segundos.
  • Inserir várias imagens em pastas no documento do Word de uma só vez.
  • Mesclar e combinar vários arquivos do Word em pastas em um com o pedido desejado.
  • Divida o documento atual em documentos separados de acordo com o cabeçalho, quebra de seção ou outros critérios.
  • Converta arquivos entre Doc e Docx, Docx e PDF, coleção de ferramentas para conversões e seleção comuns e assim por diante ...
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Alex · 1 months ago
    It throws Compile error: Syntax error, the code is 100% as the example.
  • To post as a guest, your comment is unpublished.
    dvid · 11 months ago
    I tried, and it works fine!
    I just wanted to know - could I do the same thing - but not a whole paragraph, but a sentence with a few words I'd set up - like 10 words?
  • To post as a guest, your comment is unpublished.
    Juliana · 11 months ago
    Tentei e não funcionou, só da que parou de funcionar.