Discussion :

[AVNAIM]

Variable non déclarée

J'ai dans un UserForm la procédure suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub CommandButton1_Click()
Dim Quantite As Integer
    Dim i As Integer
      Quantite = InputBox("entrez la quantité nécessaire ", "Quantité ingrédient")
           For i = 0 To ListBox3.ListCount - 1   '   listCount -1 est le dernier
            If ListBox3.Selected(i) Then
            ListBox4.AddItem (i + 7) & "  //  " & Quantite
     Workbooks("Gestion_Alimentaire").Worksheets("A_Vous_de_Jouer").Range("B2").Value = i + 7
 Workbooks("Gestion_Alimentaire").Worksheets("A_Vous_de_Jouer").Range("C2").Value = Quantité
             End If
           Next i
 
End Sub

Voici le problème:

dans la listBox la valeur Quantité est bien affichée mais j'ai un message d'erreur "variable non définie " pour la valeur Range("C2") Je trouve cela incompréhensible pour ma petite tête
Si quelqu'un peut m'éclairer je lui en serais infiniment reconnaissant
Merci d'avance
AVNAIM

[ouskel'n'or]

Effectivement : Tu déclares quantite et tu écris quantité
Pas si incompréhensible que ça...

[AVNAIM]

Bonjour,

1000000 d'excuses, je m'aperçois que j'ai oublié de te remercier. En en effet
quantite et quantité ça ne veut pas dire la même chose pour tout un chacun à l'exception de ma tête de linotte !
Il suffisait de remplacer é par e et ça marche parfaitement
merci encore : problème résolu
Avnaim