I am trying to select the date from Q2 and place that date in the header.

How do i correct the statement below to make sure the date is captured as HDRDATE?

Dim HDRDATE As Date
Set HDRDATE.Value = ("Q2")