C
CLR
Hi All......\
I'm using this UDF in XL2k and it works just fine.......when I try the same
thing in XL97 it don't seem to work.......just returns #VALUE!
***********************************
Function KillText(cellinput) As String
Set cellinput = cellinput(1)
CharVal = ""
For i = 1 To Len(cellinput)
Select Case Mid(cellinput, i, 1)
Case 1, 2, 3, 4, 5, 6, 7, 8, 9, 0, " ", "%"
CharVal = CharVal & Mid(cellinput, i, 1)
End Select
Next i
KillText = CharVal
End Function
********************************************
What I'm really trying to do is to delete the text characters out of a
selected column, leaving only the selected numerical characters
indicated........is there a better way?
TIA
Vaya con Dios,
Chuck, CABGx3
I'm using this UDF in XL2k and it works just fine.......when I try the same
thing in XL97 it don't seem to work.......just returns #VALUE!
***********************************
Function KillText(cellinput) As String
Set cellinput = cellinput(1)
CharVal = ""
For i = 1 To Len(cellinput)
Select Case Mid(cellinput, i, 1)
Case 1, 2, 3, 4, 5, 6, 7, 8, 9, 0, " ", "%"
CharVal = CharVal & Mid(cellinput, i, 1)
End Select
Next i
KillText = CharVal
End Function
********************************************
What I'm really trying to do is to delete the text characters out of a
selected column, leaving only the selected numerical characters
indicated........is there a better way?
TIA
Vaya con Dios,
Chuck, CABGx3