Vba to create report

The code works great but i've noticed something while playing around with the code
If a date range doesn't contain 1a, the code doesn't carry data over. For example, try date range 3/1/18 - 3/3/18 in the attached file (more data in this file. up to 4/12/18)