Hello guys,

I'm having a little issue right now with a function. When the user enter a caracter, I need to convert this caracter in number.


Function Convert(ByVal Value As String) As Integer




If Value= "A" Then
Convert = 10


ElseIf Value = "B" Then
Convert = 11


ElseIf Value = "C" Then
Convert = 12

ElseIf Value = "D" Then
Convert = 13


ElseIf Value = "E" Then
Convert = 14


ElseIf Value = "F" Then
Convert = 15

Else: Convert = Value


End If


End Function



Thank you