@NoSparks
Hmm. Well, technically I have Office 365 at home and Office 2007 at work, so I'm not sure why I set it to Office 2010.
Code:
yr = Application.InputBox("Enter 4 digit year from 2018 to 2025", "Create Sheets For Entire Year", Year(Date + 365), , , , , 1)
So what's going on here, exactly? You mention you set the date to January 6th, 2018, but changed that to:
Code:
endDate = DateSerial(2018, 7, 7) 'end of first pay period for 2019: 7/07/2018
However, it still goes Jan -> December. Though now that I look at it, that sets the endDate, not startDate. So I'm still not sure how startDate is set.