Can anyone pls help me with this code.

Sub Validation()
If CheckBox1.Value = Checked Then
Worksheets("Form").Range("F_Name").Enabled = True
Else
Worksheets("Form").Range("F_Name").Enabled = False
End If

End Sub

I have written this code for a check box. If the check box is checked
then a cell named F_Name should be able to take in values entered. If
the check box is not selected then the F_Name field should be
deactivated or greyed out so that no values can be entered.

The code above throws a run time error '438': Object doesn't support
this property or method.

Can anyone help me fix this.. is this a code error or Excel property
that needs to be changed

Thanks in advance for you help.

Cells don't have an enabled property. You can set the Locked property to
true or false. However, to activate it, the worksheet must be protected.
And you must turn off protection to change the locked property.

Bob Flanagan
Macro Systems
http://www.add-ins.com
Productivity add-ins and downloadable books on VB macros for Excel

<(E-Mail Removed)> wrote in message
news:(E-Mail Removed)...
> Can anyone pls help me with this code.
>
> Sub Validation()
> If CheckBox1.Value = Checked Then
> Worksheets("Form").Range("F_Name").Enabled = True
> Else
> Worksheets("Form").Range("F_Name").Enabled = False
> End If
>
> End Sub
>
> I have written this code for a check box. If the check box is checked
> then a cell named F_Name should be able to take in values entered. If
> the check box is not selected then the F_Name field should be
> deactivated or greyed out so that no values can be entered.
>
> The code above throws a run time error '438': Object doesn't support
> this property or method.
>
> Can anyone help me fix this.. is this a code error or Excel property
> that needs to be changed
>
> Thanks in advance for you help.
>

On Mar 26, 5:15 pm, "Bob Flanagan" <nore...@noreply.net> wrote:
> Cells don't have an enabled property. You can set the Locked property to
> true or false. However, to activate it, the worksheet must be protected.
> And you must turn off protection to change the locked property.
>
> Bob Flanagan
> Macro Systemshttp://www.add-ins.com
> Productivity add-ins and downloadable books on VB macros for Excel
>
> <sreeram....@gmail.com> wrote in message
>
> news:(E-Mail Removed)...
>
>
>
> > Can anyone pls help me with this code.
>
> > Sub Validation()
> > If CheckBox1.Value = Checked Then
> > Worksheets("Form").Range("F_Name").Enabled = True
> > Else
> > Worksheets("Form").Range("F_Name").Enabled = False
> > End If
>
> > End Sub
>
> > I have written this code for a check box. If the check box is checked
> > then a cell named F_Name should be able to take in values entered. If
> > the check box is not selected then the F_Name field should be
> > deactivated or greyed out so that no values can be entered.
>
> > The code above throws a run time error '438': Object doesn't support
> > this property or method.
>
> > Can anyone help me fix this.. is this a code error or Excel property
> > that needs to be changed
>
> > Thanks in advance for you help.- Hide quoted text -
>
> - Show quoted text -

I did try your fix, the error message does not appear however if the
check box is unchecked it does not lock the cell F_Name. I also
protected the sheet and truned off the the locked option in format
cell properties.