remplir tableau petit à petit

[awa123]

Bonjour,

J'aimerais remplir letableau "tableau_machine" en fonction d'un autre (tableauinit) grâce a une boucle,
il va parcourir la première colonne de mon tableau "tableauinit" pour chercher les valeurs qui correspondrait à

    "O" & val_job & oper

et a chaque fois qu'il trouvera cette valeur il va remplir mon tableau tableau_machine progressivement en recopiant cette valeur trouvée sur la première colonne (on restera fixé sur sa première colonne)

je pense que j'utilise la mauvaise boucle car ça ne me le rempli pas convenablement.

voici le bout de code que j'essaye d'adapter pour le remplissage de mon tableau :

    For i = 1 To b 'on parcourt ici le tableau à une dimension a(i) qui va jusqu’à b
       val_job = a(i) 'ici on affecte à la variable val_job la première valeur trouvée dans le tableau a(i), maintenant on sait la valeur de 'val_job
    ------------------c est ici que les choses se compliquent pour moi---------------------------
      For oper = 1 To tot_noper  'je commence avec oper =1 jusqu'à 7 (tot_noper)
       For k = 0 To UBound(tableauinit, 1)  'je lui dit qu'il va parcourir le tableau tableauinit sur la première colonne
               For e = 1 To UBound(tableau_machine, 1) 'il va également parcourir le tableau tableau_machine afin de le remplir
                                                                                        'progressivement
                      If tableauinit(k, 0) = "O" & val_job & oper Then 's'il trouve dans le tableau tableauinit la valeur "O" & val_job & oper alors
                   tableau_machine(e, 0) = tableauinit(k, 0) 'tableau_machine va se remplir en prenant la valeur "O" & val_job & oper qu'il a trouvé
                   Cells(15 + e, 7) = tableau_machine(e, 0)  'je lui dit donc de reporté la valeur qu'il a trouvé sur le petit tableau que j'ai fais sur excel
                   End If
              Next e
          Next k
      Next oper
    Next i

ce que je vois en compilant c'est que mon tableau "tableau_machine" se rempli bien sur sa première colonne,comme je le souhaitais, en revanche il se rempli avec toujours la même valeur alors qu'il devrait chercher d'autre valeur car les variable oper et val_job s'incrémente.

je voudrais que mon code parcourt la colonne B de ma feuille excel (ce qui correspondrait à k = 0 To UBound(tableauinit, 1) ) et qu'il recherche dans cette colonne la valeur "O" & val_job & oper

s'il l'a trouvé alors il va me reporter cette valeur dans la colonne G de ma feuille excel (ce qui correspondrait a mon tableau tableau_machine(e, 0)) à la première ligne , s'il retrouve une autre valeur il reporte cette nouvelle valeur à la deuxième ligne ....

et ainsi de suite...

comment lui dire de remplir tableau_machine petit à petit

a chaque fois qu'il trouvera une valeur dans le tableauinit il me l'a reporte dans mon tableau tableau_machines , sur ces deux tableau je me focalise uniquement sur leurs premières colonnes , c'est pourquoi il n'y a que les lignes qui s'incrémentent

je vous joins mon fichier excel pour le constater


merci

 

[awa123]

Re : remplir tableau petit à petit

c'est bon je viens de trouver merci encore