Checkbox appear at certain values.

[LizzleJ]

Hey,

I have an extension checkbox on my form of which i only want visible when Friday or Saturday is selected from the "day" combo list.

Private Sub Day_Change()
If Day = "Friday" Or "Saturday" Then
Extension.SetFocus
Extension.Visible = True

Else
Extension.SetFocus
Extension.Visible = False
End If
End Sub

Need a bit of help correcting this.

Thanks

P.S sorry about title i didn't know how to phrase it lol

 

[LizzleJ]

Hey,

I have an extension checkbox on my form of which i only want visible when Friday or Saturday is selected from the "day" combo list.

Private Sub Day_Change()
If Day = "Friday" Or "Saturday" Then
Extension.SetFocus
Extension.Visible = True

Else
Extension.SetFocus
Extension.Visible = False
End If
End Sub

Need a bit of help correcting this.

Thanks

P.S sorry about title i didn't know how to phrase it lol

 

[Bodisathva]

you cannot set the focus to an object that is not visible. Just change the visible switch without changing the focus. You also need a "left" side of your second comparison:

Private Sub Day_Change()
     If (Day = "Friday") Or (Day = "Saturday") Then
          Extension.Visible = True
     Else
          Extension.Visible = False
     End If
End Sub

 

[pbaldy]

2 things. Change this:

If Day = "Friday" Or Day = "Saturday" Then

and drop the setfocus lines. Personally, I'd use the after update event of the combo rather than the change event.

 

[LizzleJ]

It works great, thanks again