Excel: Spell Check while Sheet is locked

[Benoni2]

I have form in excel. I have locked most of the cells except for the four on the page that I want the user to type into. I then want them to be able to spell check those four cells using a button.

Problem: Though this works fine when the sheet is not protected, as soon as I protect the sheet, the macro/vba fails to exicute. Is there any way to fix this?

 

[SkipVought]

Hi,

Then, in your macro,

unprotect
macro code
protect

Skip,

_{[red]A palindrome gone wrong?[/red]
A man, a plan, a ROOT canal...
PULLEMALL!}

 

[Benoni2]

So this is the code:

Sub button_spellcheck()
'
' button_spellcheck Macro
' Macro recorded 9/13/2005 by Benjamin Shier
'

'

Range("B15,B12,B9,B6").Select
Range("B6").Activate
Selection.CheckSpelling SpellLang:=1033

End Sub


How do you write protect and unprotect in there? I tried something like ActiveWorkbook.Unprotect and then ActiveWorkbook.Protect before and after my three lines of code. Not sure what I need.

 

[SkipVought]

Sub button_spellcheck()
'
' button_spellcheck Macro
' Macro recorded 9/13/2005 by Benjamin Shier
'

'unprotect here

    Range("B15,B12,B9,B6").Select
    Range("B6").Activate
    Selection.CheckSpelling SpellLang:=1033
'protect here

End Sub

Skip,

_{[red]A palindrome gone wrong?[/red]
A man, a plan, a ROOT canal...
PULLEMALL!}

 

[Benoni2]

Sub button_spellcheck()
Is this what I need? It doesn't seem to be working for me in Excel 2003


' button_spellcheck Macro
' Macro recorded 9/13/2005 by Benjamin Shier
'

'
ActiveWorkbook.Unprotect

Range("B15,B12,B9,B6").Select
Range("B6").Activate
Selection.CheckSpelling SpellLang:=1033
Range("B6").Select

ActiveWorkbook.Protect
End Sub

 

[SkipVought]

Did you protect your workbook or did you protect your worksheet?

Skip,

_{[red]A palindrome gone wrong?[/red]
A man, a plan, a ROOT canal...
PULLEMALL!}

 

[Benoni2]

oops! I protect each worksheet differently on each page, I don't protect the workbook as a whole.

 

[Benoni2]

Thanks for your patience. how do you reference the current worksheet?

 

[Benoni2]

got it. Thanks so much!

 

[SkipVought]

ActiveSheet.Unprotect......

Skip,

_{[red]A palindrome gone wrong?[/red]
A man, a plan, a ROOT canal...
PULLEMALL!}

 

[hobar]

I'm assuming I could adapt this to work for a shared workbook as well?

 

[SkipVought]

Yes, but....

there are restriction regarding shared workbooks. you need to understand what they are and how they relate to your code.

Skip,

_{[red]A palindrome gone wrong?[/red]
A man, a plan, a ROOT canal...
PULLEMALL!}

 

[hobar]

I was afraid of that... Seeing as the question is more related to spellcheck in a shared protected workbook & sheet, I'll post a new thread.

http://www.tek-tips.com/viewthread.cfm?qid=1123352&page=1