Chip, may you could help me,

for 1,2,3,4,,6,7,8,9 and 0
1 return A
2 return B
....
9 return I
0 return J

so if I have in A1 a number like 4684 I would like on B1 something like DFHD.
I could use a fuction like:

Function GetDigit(Digit)
Select Case Val(Digit)
Case 1: GetDigit = "A"
Case 2: GetDigit = "B"
Case 3: GetDigit = "C"
Case 4: GetDigit = "D"
Case 5: GetDigit = "E"
Case 6: GetDigit = "F"
Case 7: GetDigit = "G"
Case 8: GetDigit = "H"
Case 9: GetDigit = "I"
Case 0: GetDigit = "J"
Case Else: GetDigit = ""
End Select
End Function

to have the digits convert but I must "separate" each digit of the entire
number and convert and concatenate it.

How can I include, Tens, Hundreds, Millions, etc on that function?

regards from Brazil
Marcelo



"Chip Pearson" escreveu:

Try
Function IsVisible(Rng As Range) As Boolean
IsVisible = (Rng(1, 1).EntireRow.Hidden = False)
End Function

--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Stewart" wrote in message
...
I need a FUNCTION that can return TRUE/FALSE as to whether a
referenced
cell/row is hidden. Got one?