For i = 8 To derln
…
Next
i
Cette boucle permet de passer toutes lignes de la feuille ‘’Bon de cde’’ depuis la ligne 8 jusqu’à la dernière ligne de données du bon.
For k = 1 To 6
…
Next k
Pour chaque ligne on fait une nouvelle bouche pour s’occuper de 6 cellules : les 3 qui ne changent pas, E1,E3 et B5 (tant pis, on les prendra 6 fois en compte, c’est plus simple) et les 3 de caque lignes de données à partir de la ligne 8.
A chaque tour de boucle, la fonction ‘’Choose’’ permet de faire correspondre chacune de ces 6 cellules de la feuille ‘’Bon de cde’’ à la cellule où on doit écrire son contenu sur la feuille ‘’Suivi de cde’’.
Exemple :
Avant de faire la 1ère boucle k, on définit la ligne lgn où on va écrire sur la feuille ‘’Suivi de cde’’ les valeurs de la boucle relative à la ligne 8 de la feuille ‘’Bon de cde’’.
Puis, au 1er tour de boucle de k, on a k qui vaut donc 1 et dans les fonctions ''choose'', on prend la première des valeurs suivantes, donc l
colB vaut 5 ; colS vaut 1 ; ln vaut 1
Et on a ainsi les 4 valeurs qui permettent de reporter les données de la première des 6 cellules de la feuille ‘’Bon de cde ‘’ dans la cellule de la feuille ‘’Suivi de cde’’
A la 2ème boucle de k on aura :
colB= 5, colS =5, ln = 3 et lgn qui vaut toujours 8
et ainsi de suite
OK ?
Bye !