VB - Excel : recherche des valeurs

Bonjour,

Je suis en train de réaliser un petit projet via Excel 2007 et Vb.

Je souhaite rechercher des valeurs dans Excel en fonction des résultats inscrit dans 2 listes (la premiere est "Niveaux" et la deuxième est "Risque").
Selon le choix, on obtient la selection d'une valeur y qui correspond à la colonne des valeurs.

If Niveaux = "Niveau faible" Then
Y = 4
Else
If Niveaux = "Niveau moyen" Then
Y = 5
Else
Y = 6
End If
End If

Puis je dois déterminer la ligne correspondante puis retirer la valeur dites et l'insérer dans une Textbox (Esp)

For i = 1 To 3
If Risque = "Q" & i Then
Esp = Cells(i + 1, Y)
Else
For u = 1 To 2
If Risque = "A" & u Then
Esp = Cells(u + 4, Y)
Else
For v = 1 To 7
If Risque = "E" & u Then
Esp = Cells(v + 6, Y)
Else
If Risque = "C1" Then
Esp = Cells(14, Y)
Else
Esp = "Erreur"
End If
End If
Next v
End If
Next u
End If
Next i

Je débute en programmation donc c'est surement la méthode dite "bourrin" mais à priori l'erreur vient soit de lde la condition de IF => Risque = "E" & u ou bien de l'envoit des donner dans la TextBox.

En espérant que vous puissiez m'aider.

merci

Configuration: Windows XP
Firefox 3.0.7