Spell Checker

[Gordon]

Hi...

I want spell checker to run on 2 protected sheets from either to either. The
user has no access to menus or toolbars but presses a macro button to
commence the spell checker...Is there any simple code out there that does
this?

Thanks in advance.

Gordon

[goober]

Here's about as easy a code as I could come up with. It will check both pages but will only show the page that is active when it is run.

Sub spell_check()

Worksheets("Sheet1").Cells.CheckSpelling SpellLang:=1033
Worksheets("Sheet2").Cells.CheckSpelling SpellLang:=1033

End Sub

' This second example switches to the page the spell check is being run on.

Sub spell_check2()

Worksheets("Sheet1").Select
Cells.CheckSpelling SpellLang:=1033
Worksheets("Sheet2").Select
Cells.CheckSpelling SpellLang:=1033

End Sub