Perhaps drop ActiveSheet from the Else. Qualify the range the same way in
both condition statements.

Mike F
"Premanand Sethuraman" wrote
in message ...
Dear All,
I am currently doing a program in which I gave inout messages to nearly
all
of the cells in a Single sheet. I kept because this message/information
will
be useful if the user is new person. But my old users don't want the input
message as it irks always when the entering cells. So I decided to give
one
checkbox in such a way that if he click the checkbox, all the input
messages
of all cells will be hided. If he want the input message back he can again
click the check box by removing the tick sign in it and after he can see
the
input messages in all the cells. I wrote the foll. coding also for it.

Sub CheckBox31_Click()
If Cells(6, 8).Value = "True" Then
Range("C11:P210").Validation.ShowInput = False
Else
ActiveSheet.Range("C11:P210").Validation.ShowInput = True
End If
End Sub

But during "Run" it is showing the error as "Application-defined or
object-defined error" which I cannot understand even after entering the
"help" command.
Please help me to sort out the problem.

Regards,
Premanand.S