G
Guest
Greetings;
I wish to spell check a text box on one of my sheets. The worksheet that
the text box is found on must be protected. I have the following code but it
doesn't seem to work. It runs through the macro, but it doesn't detect any
spelling errors when there is errors.
Sub spell_check()
'
' spell_check Macro
'
ActiveSheet.Unprotect
ActiveSheet.Shapes("Text 2").Select
Selection.CheckSpelling
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
Any help with this would be greatly appreciated.
Thanks
I wish to spell check a text box on one of my sheets. The worksheet that
the text box is found on must be protected. I have the following code but it
doesn't seem to work. It runs through the macro, but it doesn't detect any
spelling errors when there is errors.
Sub spell_check()
'
' spell_check Macro
'
ActiveSheet.Unprotect
ActiveSheet.Shapes("Text 2").Select
Selection.CheckSpelling
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
Any help with this would be greatly appreciated.
Thanks