You should test for Boolean before testing for numeric

If rng.Value = True Or rng.Value = False Then


--

HTH

RP
(remove nothere from the email address if mailing direct)


"Merle via OfficeKB.com" <u17293@uwe wrote in message
news:5a3fa28a8a4b6@uwe...
Bob,

I think the code I posted basically does what you describe in your second
paragraph - goes down through each cell, checks to see whether there's
anything in it, if so tests its value for formula, number, whatever.

I would put

=CellType(A4:A2000)

...at the top of every column I want to find what type of values are in
that
column, changing the "A" to the appropriate column letter.

That part of the function works. What doesn't appear to work is the
ability
to determine whether the cell's value is a logical (True/False) as opposed
to
a numerical. Excel interprets the words "TRUE" and "FALSE" as numbers. I
can't figure out how to differentiate between the two.

Merle

Bob Phillips wrote:
Merle,

In a UDF you usually do just the single action. Your UDF might look at
many
cells, but it returns just one result. You do NOT try and get a UDF to
return a result for the complete range (well, actually you can, but let's
keep it a bit simpler here).

So, in this case, I would not see a UDF going down a range of cells to
work
out whether each is a formula, number or whatever, but rather to have a
UDF
to check the first cell in your range, passing that cell as an argument
to
the UDF, then the next and so on.

Thus, I see no merit in knowing here how to looping through the range,
you
don't need to. Using the UDF I gave, you can put

=CellType(A1) in one cell, and
=CellType(A2) in another, each will be independently evaluated.

Does this make sense?

Ah, well, I guess I was trying to be both brief and not expose my
elementary
programming (sigh). Here's the full code which might help you better
help me.
[quoted text clipped - 57 lines]

Merle

--
Message posted via http://www.officekb.com