Check box not working out for me.. why?
This kludge works:
A2 = linked cell
A1 formula: =--A2
Private Sub Worksheet_Calculate()
If Range("A1").Value = 0 Then
Rows("5:56").Hidden = True
Else
Rows("5:56").Hidden = False
End If
End Sub
But I like Dave's suggestion!
--
Biff
Microsoft Excel MVP
"Luke M" wrote in message
...
Yea, the worksheet change event is not activated by checkboxes. As I
mentioned before, you could try doing a late event where whenever you
activate the sheet that's important, use the worksheet activate event to
call
a macro from a module that goes back to sheet with TRUE/FALSE, checks
value,
hides/unhides rows, and then returns to start sheet.
Private Sub Worksheet_Activate()
Application.ScreenUpdating = False
Call MyMacro
Me.Select
End Sub
--
Best Regards,
Luke M
*Remember to click "yes" if this post helped you!*
"TG" wrote:
Sorry,
here is what I am using:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$2" Then
If UCase(Target.Value) = "FALSE" Then
Rows("5:56").Hidden = True
Else
Rows("5:56").Hidden = False
End If
End If
End Sub
and still it does not work
TIA
TG
"Luke M" wrote:
You left out part of your macro, specifically which event are you
using!
However, as changing an object is not detected by events, I don't think
you
are heading in the right direction. Perhaps you could use the
worksheet_Activate event, and then have it check range "a2" of the
appropriate sheet and decide whether to hide the rows or not.
--
Best Regards,
Luke M
*Remember to click "yes" if this post helped you!*
"TG" wrote:
Hi,
I am using a check box and sending the true or false value to another
spreadsheet (at cell A2), I am then using the following code:
If Target.Address = "$A$2" Then
If UCase(Target.Value) = "FALSE" Then
Rows("5:56").Hidden = True
Else
Rows("5:56").Hidden = False
End If
End If
this code does not work using the check box to send a true or false
value,
it does however work when I manually type in false or true.....???
Can any one help me with this one?
Thank you guys in advance,
TG
|