Using the macro recorder will generally give you the code you need for
allowing elements when protection is enabled.
Try this................
Sub Spell_Check()
With ActiveSheet
.Unprotect Password:="justme"
.Cells.CheckSpelling SpellLang:=1033
.Protect Password:="justme", DrawingObjects:=True, _
Contents:=True, Scenarios:=True _
, AllowFormattingColumns:=True, AllowFormattingRows:=True, _
AllowInsertingColumns:=True, AllowInsertingRows:=True
.EnableSelection = xlNoRestrictions
End With
End Sub
For EnableSelection you have 3 properties. Edit to suit.
xlNoSelection
xlNoRestrictions
xlUnlockedCells
Gord Dibben MS Excel MVP
On Sat, 9 Jan 2010 14:39:02 -0800, PatriciaT
wrote:
Hello. I've been able to use below vb to spell check 'while protected'. My
issue is that i want to allow the user to be able to formatt columns and rows
(resize). When i execute the macro it clears those check marks from
protection list. Hoping someone can advise. Thank you
------------
Requires VBA to unprotect the sheet, do the spellcheck then reprotect the
sheet.
Similar to.......
Sub Spell_Check()
ActiveSheet.Unprotect Password:="justme"
Cells.CheckSpelling SpellLang:=1033
ActiveSheet.Protect Password:="justme", DrawingObjects:=True, _
Contents:=True, Scenarios:=True
End Sub
Gord Dibben Excel MVP