Thank you, Anders.

I still got an error after this change (but it got thrown in the
function, not the sub). I fiddled around and eventually added 'set' to
the assignments in both the calling sub and the function and was able
to get it to work properly.

Can anyone explain why I need to use:

Set findColorInRange = resultrange // from function

and

Set rng = findColorInRange(range("database"), 38) // from calling sub

I guess I've been clear on when to use 'set" and when not to...