• Thank you, this what I did

    =DateSerial(Year(Now), Month(Now), "1").AddMonths(1).AddDays(-1)