Tableau en VBA

Djibson -  
 Djibson -
Bonjour,
J'ai essayé de faire une operation en VBA (tabelau) et le résultat retourné est faux ,c'est comme si il faisait une operation de comparaison voici le code
'Initialise le tableau à zero
For j = 1 To 100 Step 1
entrées(j) = 0
Next j
For l = 1 To 100 Step 1
sorties(l) = 0
Next l

For t = 1 To 15 Step 1
temp(t) = 0
Next t

temp(12) = stock_initial(12) + entrées(12) - sorties(12)
donne un faux résultat

Merci de votre assistance
Configuration: Windows XP
Firefox 3.0.15

5 réponses

  1. blux Messages postés 2046 Date d'inscription   Statut Modérateur Dernière intervention   3 455
     
    Salut,

    qu'entends-tu par "donne un faux résultat" ? Tes tableaux sont de quel type ?

    Parce que la syntaxe est correcte.
    0
  2. Djibson
     
    temp(12) = stock_initial(12) + entrées(12) - sorties(12)
    les tableaux sont de type integer

    exemple:
    stock_initial(12)=0
    entrées(12)=18
    sorties=14

    le résultat affiché=12

    normalement c'est 4
    0
    1. blux Messages postés 2046 Date d'inscription   Statut Modérateur Dernière intervention   3 455
       
      Comment affiches-tu le résultat ? car tu ne donnes qu'une ligne de code d'affectation...
      0
  3. Djibson
     
    Le resultat est affiché dans une feuille excel (tableau cellule 14)

    Worksheets("Entrées_Sorties_Stock").Range("D14").Value = stock_initial(12) + entrées(12) - sorties(12)
    0
  4. blux Messages postés 2046 Date d'inscription   Statut Modérateur Dernière intervention   3 455
     
    T'as claqué des msgbox partout pour voir les valeurs des tableaux ?
    et un msgbox stock_initial(12) + entrées(12) - sorties(12) ?
    0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. Djibson
     
    Bonjour
    Merci vraiment pour tes réponses,j'ai utilisé le debogage pour connaitre les valeurs du tableau
    et je constate que les données sont bien chargées mais l'opération se fait pas correctement

    Je suis vraiment bloqué

    Merci pour ton aide
    0