tu a écrit :
La partie la plus difficile
dv = lig - 13
exact ; alors un p'tit complément d'info :
* tu as compris qu'au départ, celX référence la cellule A8
* pour la fiche actuelle, la dernière ligne est la ligne n° 15, avec "Fourches" ➯ dlig = 15.
* la boucle lig fait que lig va de 13 à dlig donc de 13 à 15
la cellule qui sert de référence pour écrire une ligne est : celX.Offset(dv) : [A8].Offset(dv) 'dv ligne(s) en dessous
pour lig = 13 : dv = lig - 13 = 13 - 13 = 0 ; [A8].Offset(0) = cellule A8
pour lig = 14 : dv = lig - 13 = 14 - 14 = 1 ; [A8].Offset(1) = cellule A9
pour lig = 15 : dv = lig - 13 = 15 - 15 = 2 ; [A8].Offset(2) = cellule A10
ces cellules servent pour écrire la date ; toutes les autres infos sont écrites sur la même ligne, à droite.
[A8]
est la même chose que Range("A8")
[A8].Offset(dv)
est la même chose que [A8].Offset(dv, 0)
(décalage ligne : dv ; décalage colonne : 0)
exemple pour celX.Offset(dv, 3) = [E6]
:
celX
: cellule A8
.Offset(dv, 3)
:
pour lig = 15 : dv = lig - 13 = 15 - 13 = 2 ➯ 2 lignes plus bas que A8 ➯ ligne 10
décalage colonne = 3 ➯ 3 colonnes à droite de A8 ➯ colonne D
on écrit donc la donnée de la cellule E6 (le Type d'Intervention) en cellule D10
note bien que dv est le décalage ligne et 3 est le décalage colonne
les deux par rapport à celX, donc par rapport à A8
dhany