Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
CheckBox VBA Issue
Hello,
I have a UserForm that has lots of command buttons, listboxes, comboboxes, and 4 checkboxes. I need the 4 checkboxes to show as checked if there's a value in certain cells. 2 of these are no problem since it's the letter "P". The other 2 however I'm having trouble with since they will (or will not) have a value in them. I've come up with a code that works if there's any value but 0 in it, but not if there is. Here's what I came up with for the 2 I'm having trouble with: Private Sub UserForm_Activate() If ActiveSheet.Range("T8") < 0 Then Me.CheckBox5.Value = True End If If ActiveSheet.Range("T55") < 0 Then Me.CheckBox4.Value = True End If End Sub I'm sure it's just a digit or two, but I can't get it to work. Any help would be appreciated, and thank you in advance. -- Message posted via OfficeKB.com http://www.officekb.com/Uwe/Forums.a...mming/200810/1 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
CheckBox VBA Issue
Maybe it's just me, but I can't tell what specifically would trigger
the checkboxes to be checked (i.e. what the problem is). Can you state clearly under what conditions the checkboxes need to be checked? --JP On Oct 13, 3:46*pm, "Joe_Hunt via OfficeKB.com" <u45578@uwe wrote: Hello, I have a UserForm that has lots of command buttons, listboxes, comboboxes, and 4 checkboxes. I need the 4 checkboxes to show as checked if there's a value in certain cells. 2 of these are no problem since it's the letter "P". The other 2 however I'm having trouble with since they will (or will not) have a value in them. I've come up with a code that works if there's any value but 0 in it, but not if there is. Here's what I came up with for the 2 I'm having trouble with: Private Sub UserForm_Activate() * * If ActiveSheet.Range("T8") < 0 Then * * * * Me.CheckBox5.Value = True * * End If * * If ActiveSheet.Range("T55") < 0 Then * * * * Me.CheckBox4.Value = True * * End If End Sub I'm sure it's just a digit or two, but I can't get it to work. Any help would be appreciated, and thank you in advance. |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
CheckBox VBA Issue
You might want to add a line like:
Else Me.CheckBox5.Value = False to your If...Then statements. That way if they had previously been True but the value was changed to zero or "" then it would display unchecked. \ "Joe_Hunt via OfficeKB.com" wrote: Hello, I have a UserForm that has lots of command buttons, listboxes, comboboxes, and 4 checkboxes. I need the 4 checkboxes to show as checked if there's a value in certain cells. 2 of these are no problem since it's the letter "P". The other 2 however I'm having trouble with since they will (or will not) have a value in them. I've come up with a code that works if there's any value but 0 in it, but not if there is. Here's what I came up with for the 2 I'm having trouble with: Private Sub UserForm_Activate() If ActiveSheet.Range("T8") < 0 Then Me.CheckBox5.Value = True End If If ActiveSheet.Range("T55") < 0 Then Me.CheckBox4.Value = True End If End Sub I'm sure it's just a digit or two, but I can't get it to work. Any help would be appreciated, and thank you in advance. -- Message posted via OfficeKB.com http://www.officekb.com/Uwe/Forums.a...mming/200810/1 |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
CheckBox VBA Issue
Well, that was a good idea but it didn't work. I've noticed another problem
now that I think is related. I'm not sure how to word it so I'll repost once I can get my head around it. Thanks to both JP and JLGWhiz for trying. JLGWhiz wrote: You might want to add a line like: Else Me.CheckBox5.Value = False to your If...Then statements. That way if they had previously been True but the value was changed to zero or "" then it would display unchecked. \ Hello, I have a UserForm that has lots of command buttons, listboxes, comboboxes, [quoted text clipped - 18 lines] I'm sure it's just a digit or two, but I can't get it to work. Any help would be appreciated, and thank you in advance. -- Message posted via OfficeKB.com http://www.officekb.com/Uwe/Forums.a...mming/200810/1 |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
CheckBox VBA Issue
Maybe you want to check to see if the cell is empty:
if isempty(activesheet.range("t8").value) then or if activesheet.range("t8").value = "" then But I'm not sure I understand the real question. "Joe_Hunt via OfficeKB.com" wrote: Hello, I have a UserForm that has lots of command buttons, listboxes, comboboxes, and 4 checkboxes. I need the 4 checkboxes to show as checked if there's a value in certain cells. 2 of these are no problem since it's the letter "P". The other 2 however I'm having trouble with since they will (or will not) have a value in them. I've come up with a code that works if there's any value but 0 in it, but not if there is. Here's what I came up with for the 2 I'm having trouble with: Private Sub UserForm_Activate() If ActiveSheet.Range("T8") < 0 Then Me.CheckBox5.Value = True End If If ActiveSheet.Range("T55") < 0 Then Me.CheckBox4.Value = True End If End Sub I'm sure it's just a digit or two, but I can't get it to work. Any help would be appreciated, and thank you in advance. -- Message posted via OfficeKB.com http://www.officekb.com/Uwe/Forums.a...mming/200810/1 -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How to have Checkbox A uncheck with checked Checkbox B | Excel Discussion (Misc queries) | |||
link a checkbox in a sheet to a checkbox on a userform? | Excel Programming | |||
How do I link one checkbox to update another checkbox? | Excel Programming | |||
checkbox on form reset from checkbox on sheet | Excel Programming | |||
checkbox | Excel Programming |