Are you sure you have run debug - (spelling mistake for 'TRUE')
![]()
Private Sub chkChristmas_Click() If chkChristmas Then HolSF(2, 1) = Ture Else HolSF(2, 1) = False End If End Sub Private Sub chkChristWeek_Click() If chkChristWeek Then HolSF(1, 1) = Ture Else HolSF(1, 1) = False End If End Sub Private Sub chkNewYear_Click() If chkNewYear Then HolSF(1, 1) = Ture Else HolSF(1, 1) = False End If End Sub
Bookmarks