Looking a little closer at your code it should probably be:

Set rngTemp = rngCol1.Find("Party Name:", rngCol1(1), _
xlValues, xlPart, xlByRows,xlNext, False)

--
Regards,
Tom Ogilvy


"JonWayne" wrote in message
. ..
I get the error, "Unable to get the Find property of the Range class",
whenever I use the Find method in Excel VBA. This is my usage:

Set rngTemp = rngCol1.Find("Party Name:", "A1", xlValues, xlPart,
xlByRows,
xlNext, False)

Any ideas?