Ok, I have gotten the thing figured and also, how to condense the data to make the list continuous without large blank areas between selected fields to be generated in the report.
If DCount("*", "[TblReqAcc]", "[AdditionalDutyRoster] = '" & Me.AdditionalDutyRoster & "'") <= 0 Then...