Spell Check Macro - Move to Cell

J

Josh O.

I am using the below macro to spell check a protected worksheet...
I noticed that when suggesting a word, it doesn't move to the cell where the
misspelled word is located, like the built in menu item does... any way to
make it work that way?

Sub SpellCheck()
ActiveSheet.Unprotect Password:="Password"
Cells.CheckSpelling CustomDictionary:="CUSTOM.DIC", _
IgnoreUppercase:=False, AlwaysSuggest:=True
ActiveSheet.Protect Password:="", DrawingObjects:=True, _
Contents:=True, Scenarios:=True _
, AllowFormattingCells:=True, AllowSorting:=True, AllowFiltering:=True
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top