"=IF(AND($N$4 >= 1, $N$4 <=15), 31)"

"=IF(AND($N$4 >= 16, $N$4 <=46), 31)"

"=IF(AND($N$4 >= 47, $N$4 <=74), 28)"

"=IF(AND($N$4 >= 75, $N$4 <=105), 31)"

"=IF(AND($N$4 >= 106, $N$4 <=135), 30)"

"=IF(AND($N$4 >= 136, $N$4 <=166), 31)"

"=IF(AND($N$4 >= 167, $N$4 <=196), 30)"

"=IF(AND($N$4 >= 197, $N$4 <=227), 31)"

"=IF(AND($N$4 >= 228, $N$4 <=258), 31)"

"=IF(AND($N$4 >= 259, $N$4 <=288), 30)"

"=IF(AND($N$4 >= 289, $N$4 <=319), 31)"

"=IF(AND($N$4 >= 320, $N$4 <=349), 30)"

"=IF(AND($N$4 >= 350, $N$4 <=365), 31)"

Will a series of "Else IFs" work for this in VBA???

Thanks,

JB