VBA Code Needed that will Hide / Unhide a row when used with a "Check Box"

[Barryoffshore]

I need a VBA code that will when used with a Form Control "Check Box" will unhide / hide a row. To be more exact, I'm needind the code to "Hide" row 34 when unchecked and "Unhide" the same row when checked. Can someone help me please. By the way, I'm using Excel 2010. Thank you!!!

 

[dmt32]

Hi,t
Try this.

Sub CheckBox1_Click()
Sheets(1).Rows(34).Hidden = Not Sheets(1).CheckBoxes("Check Box 1").Value = 1
End Sub

Code in standard module & assigned to your checkbox. Change names as required.

Dave

 

[Barryoffshore]

Well, that didn't work... It returned an error (not a bug) - error #400 - whatever that means???

 

[dmt32]

Well, that didn't work... It returned an error (not a bug) - error #400 - whatever that means???

I take it that's a Thank-you for responding to my request for assistance?

Is your worksheet protected & did you rename the checkbox / worksheet as stated if required?

Dave

 

[Barryoffshore]

Actually I do thank you very much - I need all the help I can get!!! No, there are no protections on the workbook. More than likely I'm just doing something wrong... I'm still learning this stuff and I tend to make a lot of mistakes.

 

[dmt32]

Your request was for assistance with a "Form Control Check Box" which would reside on a worksheet. Are you actually referring to an ActiveX checkbox on a UserForm or worksheet? If so, code would look this:

Private Sub CheckBox1_Click()
Sheets(1).Rows(34).Hidden = Not Me.CheckBox1.Value
End Sub

and would be placed either in your forms or worksheets code page.
Dave

 

[Barryoffshore]

Thank you again for responding so quickly!!! This time it came back with "Compile Error - Improper use of Me keyword". I truly have no idea what that means either

 

[dmt32]

where is this checkbox on a userform? or a worksheet?

and have you placed the code either in the forms or worksheet code page and NOT in a standard module?

 

[Barryoffshore]

It's on the worksheet - Sheet2

 

[dmt32]

It's on the worksheet - Sheet2

and where have you placed the code? & did you update it for correct sheet checkbox name?

If Checkbox is Activex then you need to Right Click Tab > View Code & place code there.

If its a Forms checkbox then place first example in a standard module & assign to your checkbox.

All names will need updating to match your Sheet / Checkbox names.

Dave