Hi,

can someone please explain why this proction macro does not allow the spell
check function to work when the 'userinterfaceonly' option is in it?!

Sub ProtectAll()

Dim sPassword As String
sPassword = "LMW5487"

If Application.InputBox( _
Prompt:="Please enter the password", _
Title:="Password", _
Type:=2) < sPassword Then

MsgBox "Wrong password!"
Exit Sub

End If

Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
ws.Protect Password:="sPassword", AllowFormattingCells:=True, _
Contents:=True, Scenarios:=True, userinterfaceonly:=True

Next ws

End Sub
--
Warm