Looking for excel function to convert hex to Ascii

B

Bob Phillips

Public Function Hex2ASCII(hexvalue)
Dim i As Long
Dim tmp

If TypeName(hexvalue) = "Range" Then
tmp = hexvalue.Value
ElseIf TypeName(hexvalue) = "String" Then
tmp = hexvalue
Else
Hex2ASCII = CVErr(xlErrRef)
Exit Function
End If

For i = 1 - Len(tmp) Mod 2 To Len(tmp) Step 2
Hex2ASCII = Hex2ASCII & Chr(Mid(tmp, i, 2))
Next i

End Function


--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Convert Cell Value to ASCII 1
Convert a file to an ASCII 1
How can i convert an ASCII character to decimal/hex in Excel? 1
VBA - Hex To ASCII 3
unicode to ASCII conversion 1
Number to Text (Ascii / Ansi) in Excel 1
Import binary file and convert to HEX data 2
Excel 2

Top