Determine whether a character is Upper or Lower case

[mikesalemi]

Is there a function that will allow me to determine if a character is
either Upper or Lower Case? If not, any idea how I can build one in
VBA?

 

[Guest]

give this function a try

public function IsUpperCase(byval InputString as string) as boolean
if ucase(inputstring) = inputstring then
IsUpperCase = true
else
IsUpperCase = false
end if
end function

 

[Dave Peterson]

One character in A1?

=if(exact(a1),upper(a1)),"upper","not upper")

But you'll have to add a couple of checks if there's a possibility of
non-alphabetic characters in that cell.

=IF(LEN(A1)<>1,"Too many chars",
IF(OR(CODE(LOWER(A1))<CODE("a"),CODE(LOWER(A1))>CODE("z")),"not alpabetic",
IF(EXACT(A1,UPPER(A1)),"upper","Lower")))

All one cell.