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