Report Code
'-----------------------------Create SQL String---------------
Dim FindLast As String, Findthis As String
Findthis = ",'" & Forms![FmComparable]![txtBeginMonth] & "_" & Forms![FmComparable]![txtYear] & " ' "
For counter = 2 To Forms![FmComparable]![txtEndMonth]
Findthis = Findthis...