Hi,
Am having a macro for highlighting misspell words with a yellow color, but sometimes checking yellow colored ones also missing by overlook due to more no of tables in a document.
In a document am having more than 100 tables and continously monitoring is difficult, can we automate this by tagging yellow colored line items or misspell line items with a " ## " or anyother special characters... it will be helpful for me to check only with " ## " line items and make it in a proper way.
Please integrate the " ## " for the below code to highlight the misspell words.
Or
If any misspell word found in a cell that cell should be tagged as "##" at the beeginning of the line in a cell.
I had already posted a similar one in this forum but i didnt get any responses, so i have worked something and again posting with a sample code.
https://www.msofficeforums.com/word-...ell-words.html
For reference PFA.
Code:
Sub Highlight_Misspelled_Test()
Selection.LanguageID = wdEnglishUS
Selection.NoProofing = False
Application.CheckLanguage = True
Dim oWord As Range
Dim StoryRange As Range
Dim nTbl As Table
' Loop Through Each table
For Each nTbl In ActiveDocument.Tables
Set StoryRange = nTbl.Range
Application.CheckSpelling Word:=StoryRange
For Each oWord In StoryRange.Words
If Not Application.CheckSpelling(Word:=oWord.Text) Then
oWord.HighlightColorIndex = wdYellow
End If
Next oWord
Next
End Sub