Bonjour à tous,

A partir d'un choix effectué dans une liste déoulante sur userform j'aimerais récupérer une valeur qui se situe dans la meme fueille et qui dépend du choix de l'utilisateur et qui va me servir pour mes calculs.
Aussi je vous donne un exemple:
L'utilisateur fait un choix de materiaux ex: AAAC
Je dois ensuite à partir d'une valeur calculé trouver les deux valeur normalisée (la première valeur supérieure à Scc et la première valeur inférieure a Scc)qui se situent dans un tableau et qui dépend du type de matériaux
Soit par exemple:
Scc: section du conducteur calculée théorique
AAAC: matériau constituant le conducteur (cette valeur est stockée dans une liste qui s'appelle Lconductor.listindex)
Voila le code que j'ai tapé et qui ne fonctionne pas:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Dim Snorm As Double
    Dim i As Integer
    Dim indiceligne As Integer
    Dim indicecolonne As String
    Dim k As Integer
 
    i = Lconductor.ListIndex + 7
 
    If (i = 7) Then indicecolonne = "AG" =>colonne: section normalisée pour conducteur 1
    If (i = 8) Then indicecolonne = "AH" =>colonne: section normalisée pour conducteur 2
 
    If (i = 9) Then indicecolonne = "AI" =>... 3
    If (i = 10) Then indicecolonne = "AJ" =>... 4
 
    k = 7
    Do Until ActiveSheet.Range(indicecolonne & k).Value - Scc > 0
            indiceligne = k
            k = k + 1
            Loop
    Snorm = ActiveSheet.Range("indicecolonne" & "indiceligne").Value
    MsgBox Snorm
A priori ici je n'essaye de récupérer que la première section normalisée de valeur juste supérieure à Scc..
On m'affiche un message d'erreur que je n'arrive pas à interpréter.
Merci d'avance pour votre aide