Dim StartMonth As String
Dim NextCell As Range

If StartMonth = "January" And ActiveCell < 31 Then
NextCell = ActiveCell + 1
ElseIf StartMonth = "January" And ActiveCell = 31 Then
NextCell = 1
End If
When looping though this IF statement it will only loop 31 times.
If I change the number to 35, itll loop 35 times, but there are only 31 days in January so want it to start from 1 after 31.
It is ment to set the date on a calender 5 weeks in length.
If it starts on 4 it will finish on 4 and miss the last 3 days dates, same happends with any start number, 5 ends on 5, 9 ends on 9, etc...