i have 2 requests
It sounded different.

run this to see al chr codes
[VBA]Sub CHARCODE()
For i = 33 To 255
Cells(i - 32, 1).Value = Chr(i)
Next i
End Sub[/VBA]