Yes, Hurrah!!!!! Witek's solution worked for my Australian beta
tester, so I'm assuming it will also work for my Indian beta tester.
I did change Witek's code slightly in that I took out c.select

Set rDate = wsData.Range("a3:a" & LastRow)

Dim iDate As Long
iDate = Fix(Now())
Dim c As Range

For Each c In rDate
If c.Value2 = iDate Then
Set rFound = c
Exit For
End If
Next c

Thank you very much for all of your assistance and patience with me!
Warmly,
Susan


On Jan 18, 2:53*pm, Ron Rosenfeld wrote:
On Fri, 18 Jan 2013 10:13:42 -0800 (PST), Susan wrote:
Nope, they are dates. *What looks like 12/31/2012, when formatted as "general", shows 41274.

Every single solution provided works for me, here in the US, and for other beta testers in the US. *I also sent the spreadsheet to another user in Australia, and he comes up with the same "Datenot found" error message. *So I've ruled out a problem with the India user's individual computer.

Haven't tried Witek's offering yet - that's next. *Will report back.

Could it possibly be something to do with their non-standard Windows OS? *I know the user in India uses "Windows Ultimate".

Thanks for all the help.
Susan

Range.Find doesn't seem to work well with dates. *I would avoid it.

You are going to have to loop through the cells and compare each with thedateyou are looking for.
If you have a lot of cells to search, you will find a significant speed advantage to reading the cells into a variant array, then looping through the array (all in VBA).

Something like Witek's idea should work.