Difficultés avec la fonction SI

Bonsoir a tous,

je me heurte a une difficulté dans la réalisation d'une échelle de notation qui se presente comme suit:

SCORE RATING / NOTE
<9,09 11
<18,18 10
<27,27 9
<36,36 8
<45,45 7
<54,54 6
<63,63 5
<72,72 4
<81,81 3
<90,90 2
<100 1




En effet compte tenu du fait que la fonction SI ne prend pas plus de 7 imbrication, il m'est impossible d'incorporer toute les notes.

Etant novice dans le language vba, quelqu'un pourrait il m'aider dans ce sens?

Voici ce que j'ai ecris meme si je ne suis pas tres convaincu de mon code lol

Sub variables()
' Declaration des variables
    Dim scorequantitatif As Byte, notequantitative As Byte
    
' ATTRIBATION D'UNE  NOTE SUR UNE ECHELLE ALLANT DE 1 A 11 variables des variables
    scorequantitatif = Cells(9, 7)
    notequantitative = Cells(9, 8)
    
    
    with
    If Range("G9").Value <= "9,09" Then
    Range("h9").Value = "11"
End If
    If Range("G9").Value < "18,18" Then
    Range("h9").Value = "10"
End If
    If Range("G9").Value < "27,27" Then
    Range("h9").Value = "9"
End If
    If Range("G9").Value < "36,36" Then
    Range("h9").Value = "8"
End If
    If Range("G9").Value < "45,45" Then
    Range("h9").Value = "7"
End If
    If Range("G9").Value < "54,54" Then
    Range("h9").Value = "6"
End If
    If Range("G9").Value < "63,63" Then
    Range("h9").Value = "5"
End If
    If Range("G9").Value < "72,72" Then
    Range("h9").Value = "4"
End If
    If Range("G9").Value < "81,81" Then
    Range("h9").Value = "3"
End If
    If Range("G9").Value < "90,90" Then
    Range("h9").Value = "2"
End If
    If Range("G9").Value <= "100" Then
    Range("h9").Value = "1"
End If
    If Range("G9").Value > "100" Then
    Range("h9").Value = "1"
End If
End Sub