Try...
Sub Scan_In_Check()

Hi Garry,

That smoothed the wrinkles out quite nicely.

Minor typo

sMsgs$

sMsg = "No match found!"

but easily corrected.

Turns out I actually need to look at three different ranges to assure non dupes so it was pretty easy to replicate the third range code from what was already there.

On to exporting to the monthly sheets with date/time stamp.

Thanks for the great help.

Howard