I have a filter form with txtDateFrom and txtDateTo
I need a formula for showing the txtDateTo as the end of the this quarter.
Private Sub btnQtrEnd_Click()
Me!txtDateFrom = Date
Me!txtDateTo = ?????
ie: today (txtDateFrom) = Dec 10, 2014
txtDateTo would need to = DEc 31, 2014