When run the value of ColDay1 is 0. Should the datatype for ColDay1 be different?
Dim ColDayName As Variant Dim ColDay1 As Integer ColDayName = Array(12, 19,