if rng = "" or _
( isnumeric(left(rng,1)) and _
lcase(mid(rng,2,1)) < ucase(mid(rng(2,1))) then

--
Regards,
Tom Ogilvy


Paul James wrote in message
...
My thanks to Tom and Bob.

One other question:

I'd also like the expression to return true if the cell has no characters
of
any type in it. Can I do that by saying

if rng < "" and_
if isnumeric(left(rng,1)) and _
lcase(mid(rng,2,1)) < ucase(mid(rng(2,1)) then

??