User Defined Function in Excel that returns a String of the first selection of Spell Check

[BillyBumkin]

Hello!
I have been trying to create a UDF for a that would be passed a string, have that string run through Excel's spell check, and (if misspelled) return the first spelling value suggestion. If spelled correctly, '' would be returned.
What I have a list of thousands of misspelled cells and wanted to create this function as a first pass in correcting the spelling.

The corrected return value would then be used in a VLOOKUP to validate that the suggested string is correct.

I have seen some Word SUBs that attempt to do something similar, but they don't seem to work for me in Excel.

Many thanks!
BB

 

[6StringJazzer]

VBA can invoke spell check but there is no API for spell check that allows you to query its status, misspelled words, or suggestions for corrections. If you give it a string it just returns TRUE or FALSE. If you apply it to a worksheet it just invokes the user interface for spell check.

It might be possible to write your own custom code to access the spelling dictionary and locate misspelled words but giving suggestions for corrections is a bit more complicated.

 

[BillyBumkin]

WORD VBA seems to have statements that can query the Spell Checker, but I don't see any equivalent in EXCEL:

WORD example:
Dim strWord As String: strWord =
Dim sssGetSpellingSuggestions As SpellingSuggestions
Set sssGetSpellingSuggestions = GetSpellingSuggestions(Word:=strWord)

S2 = wd.GetSpellingSuggestions(r)(1)

Is there a way to use these WORD VBA functions within EXCEL VBA?
BB

 

[6StringJazzer]

You could create an instance of Word in Excel VBA and then call that.