I have a worksheet where the questions are protected but the responses areas
are not. Is there anyway to enable the spell check on a protected sheet?

Hi,

Try this in a general module.

Sub SpellCheck()
ActiveSheet.Unprotect Password:="MyPass"
Cells.CheckSpelling CustomDictionary:="CUSTOM.DIC", AlwaysSuggest:=True
ActiveSheet.Protect Password:="MyPass"
End Sub

Mike

"spell check on protected sheet" wrote:

I have a worksheet where the questions are protected but the responses areas
are not. Is there anyway to enable the spell check on a protected sheet?

Using a macro is the only work around that I know of.

Sub Spell_Check()
ActiveSheet.Unprotect Password:="justme"
Cells.CheckSpelling SpellLang:=1033
ActiveSheet.Protect Password:="justme", DrawingObjects:=True, _
Contents:=True, Scenarios:=True
End Sub

Unprotects the sheet, does the spellcheck then reprotects the sheet.

"justme" can be changed to your password.


Gord Dibben MS Excel MVP

On Tue, 30 Sep 2008 04:00:02 -0700, spell check on protected sheet <spell
check on protected wrote:

I have a worksheet where the questions are protected but the responses areas
are not. Is there anyway to enable the spell check on a protected sheet?