Check box visible on certain days

[todgers]

Hooray I've done it

It was simple in the end, Tape_Date not Tape.Date

Thanks for all your help

Private Sub Form_Current()

Select Case DatePart("w", Tape_Date)
Case "1", "3", "5"
Me.Datapulse.Visible = True
Me.Label86.Visible = True
Me.Label87.Visible = True
Case Else
Me.Datapulse.Visible = False
Me.Label86.Visible = False
Me.Label87.Visible = False
End Select

End Sub

 

[selenau837]

Hooray I've done it

It was simple in the end, Tape_Date not Tape.Date

Thanks for all your help

It Tape_Date the name of that field that holds the date that is being checked.

I'm glad you got it figured out.