How to Find & Highlight Duplicate Sentences in MS Word at once

How to find on Android

not working

Thanks brother !! You saved my hours 👍

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

The link expired, would it be possible to update it please?

Is there something that can identify near-duplicate sentences? In the documents I work in, the sentences often vary very slightly, but I'd still like to identify them.

You Save My Time Thanks A Bunch

Hi! Thanks so much for this! Don't know if anybody else is experiencing this though, but somehow the macros highlights the last paragraph of the document despite not having any duplicates...?

Where am i getting the code from?

The macro code link is expired again

The Macro Code link is expired, can't be accessed

Thanks a lot.

after fixing how we can remove module function from a specific world document

work only one time.

thanks a lot

Hi, do you have any idea where can I find infos about; How to highlight or find in a TEXT ALL the WORDS that starts or ends ONLY with a certain type of letter? thank you p/s It can be with word, excel, CSS, PHP or HTML

You're a freakin genius!

It only highlighted a small portion of the duplicated text.

tested it, it works but doesn't find all the duplicates! disappointing :(

In this video, we discuss finding and highlighting. But, I want to "find and delete words" that appear more than once, how do I do that? Please help me, thanks before..

Thanks!

This worked

Nice!! I just had to save the document as a Word Macro Document. Thanks!

sir, how i find out same duplicate MCQ question in same question paper? please guide me for this.

I do the same but it reflects as compile error....invalid outside procedure. Kindly help me to come out this problem

The macro just hangs on ms office professional plus 2016??

thank you so much you saved me hours
it works on words too :D

Try blocking fn keys and then click on alt+f11

👍Great

Thank you for Find & Highlight Duplicate Paragraph or Sentences, it's Work!
Is it possible auto delete all Green Highlighted phrases?
or Find & Delete Duplicate Paragraph or Sentences?

thanks for the video however I'm down to the module and I'm waiting for the code to come up, and I'm waiting. where does the code come from?

not working on 2019. im waiting for 2 hours of precessing

very nice and helpful

thsnks its working

totally useless

does not work my word app closing instantly once I paste the code what's going on

Not perfect, but quite helpful. Thanks a lot :)
PS: Took almost an hour on a 700 page document.

Im doing Alt+F11 and Visual Basic does not show nor the modules.

It's not opening it on ms word 2007 when I press alt+F11. Please help

Where from i can copy macros code?

Thanks you. Is there similar way to find and highlight duplicate words? it would be a great help if you could provide macro for it as well.

thx

Thankyou

does not work well. it does not catch all the rep and bullet points

FANTASTIC

Thank you!

not working. even i cannot save . force me to save it as .docm

This seems to work for some redundant text, but I still see duplicate text that isn't highlighted. What might prevent that from happening in the macro? Formatting? The dup language that it's not flagging is what triggered me to go find this (and grateful to see you sharing the macro), but I want to make sure nothing slips by when I share with colleagues. Thank you for the video!

How I can do it in Macbook? We have no virtual basic for apps

Thank you very much for sharing the code.But I still have a troube. If it is a language like Hindi or Japanese, it will not work. Can you please tell me how can I modify ? Thanks. The Language like "namaḥ saptānām samyaksambuddha koṭīnām śrāvaka saṃghānām".