Checkbox to Hide Column G
 

Any Reason why this does not give error or a response? I built it with help
from this forum and everything seems right. Im stumped.

Im using office 2003.
______________________


Private Sub CheckBox20_Click()

If CheckBox20 = True Then
Columns("G").Hidden = True
Else
Columns("G").Hidden = False
End If

End Sub

Checkbox to Hide Column G
 

try this:

Private Sub CheckBox20_Click()

If CheckBox20 = True Then
activesheet.Columns("G").Hidden = True
Else
activesheet.Columns("G").Hidden = False
End If

End Sub

:)
susan




On Oct 23, 1:26*pm, Charlie wrote:
Any Reason why this does not give error or a response? I built it with help
from this forum and everything seems right. Im stumped.

Im using office 2003.
______________________

Private Sub CheckBox20_Click()

If CheckBox20 = True Then
* * Columns("G").Hidden = True
Else
* * Columns("G").Hidden = False
End If

End Sub

Checkbox to Hide Column G
 

hi
i just plugged your code into my 2003 and it works??????
what problems are you haveing with it.

regards
FSt1

"Charlie" wrote:

Any Reason why this does not give error or a response? I built it with help
from this forum and everything seems right. Im stumped.

Im using office 2003.
______________________


Private Sub CheckBox20_Click()

If CheckBox20 = True Then
Columns("G").Hidden = True
Else
Columns("G").Hidden = False
End If

End Sub

Checkbox to Hide Column G
 

hrmm...Still does absolutely nothing when checked and unchecked.

Checkbox to Hide Column G
 

i have a check box with that code in it but it does absolutely nothing when i
check it or uncheck it, no error, no column hiding nothing.

-Charlie

"FSt1" wrote:

hi
i just plugged your code into my 2003 and it works??????
what problems are you haveing with it.

regards
FSt1

"Charlie" wrote:

Any Reason why this does not give error or a response? I built it with help
from this forum and everything seems right. Im stumped.

Im using office 2003.
______________________


Private Sub CheckBox20_Click()

If CheckBox20 = True Then
Columns("G").Hidden = True
Else
Columns("G").Hidden = False
End If

End Sub

Checkbox to Hide Column G
 

it worked when i tested it (excel 2000 win xp) using a control toolbox
checkbox....... i just changed the coding to checkbox1 to match my
checkbox.
maybe you are using a forms checkbox?
susan


On Oct 23, 1:58*pm, Charlie wrote:
i have a check box with that code in it but it does absolutely nothing when i
check it or uncheck it, no error, no column hiding nothing.

-Charlie



"FSt1" wrote:
hi
i just plugged your code into my 2003 and it works??????
what problems are you haveing with it.

regards
FSt1

"Charlie" wrote:

Any Reason why this does not give error or a response? I built it with help
from this forum and everything seems right. Im stumped.

Im using office 2003.
______________________

Private Sub CheckBox20_Click()

If CheckBox20 = True Then
* * Columns("G").Hidden = True
Else
* * Columns("G").Hidden = False
End If

End Sub- Hide quoted text -

- Show quoted text -

Checkbox to Hide Column G
 

Aghh haah! that was it, I grabbed the wrong checkbox. boo... Thanks!

"Susan" wrote:

it worked when i tested it (excel 2000 win xp) using a control toolbox
checkbox....... i just changed the coding to checkbox1 to match my
checkbox.
maybe you are using a forms checkbox?
susan


On Oct 23, 1:58 pm, Charlie wrote:
i have a check box with that code in it but it does absolutely nothing when i
check it or uncheck it, no error, no column hiding nothing.

-Charlie



"FSt1" wrote:
hi
i just plugged your code into my 2003 and it works??????
what problems are you haveing with it.

regards
FSt1

"Charlie" wrote:

Any Reason why this does not give error or a response? I built it with help
from this forum and everything seems right. Im stumped.

Im using office 2003.
______________________

Private Sub CheckBox20_Click()

If CheckBox20 = True Then
Columns("G").Hidden = True
Else
Columns("G").Hidden = False
End If

End Sub- Hide quoted text -

- Show quoted text -

Checkbox to Hide Column G
 

This sounds like something that would happen to me... seemingly harmless
normal code - not working!

I would try opening a new workbook, add a checkbox, double click it and add
the code. Set a breakpoint on the event and step through the click. If that
works, then I would go through your original workbook and double check for a
naming error. When I first tried your code, I added CheckBox1 to my workbook
and clicked on it but pasted your code referencing Checkbox20 and it didn't
work until I caught the naming conflict.

John

"Charlie" wrote:

Any Reason why this does not give error or a response? I built it with help
from this forum and everything seems right. Im stumped.

Im using office 2003.
______________________


Private Sub CheckBox20_Click()

If CheckBox20 = True Then
Columns("G").Hidden = True
Else
Columns("G").Hidden = False
End If

End Sub