VBA - décaler d'une année les données sur un fichier compte de résultat

[mulpha]

Bonjour,

A faire en VBA, svp.
J'ai plusieurs fichiers de compte de résultat par affaire (voir fichier cijoint) que j'alimente toute l'année et qui a des 10aines de lignes.
A chaque cloture d'année je dois additionner les cumuls de année a-1(colonne D= fin 2009) et celle de l'année a (E à K = 2010)
J'aimerais donc avoir à la place du cumul 2009, le cumul 2010. mon but est de mettre dans la future colonne D les données actuelement présentent de D à K.

j'aimerais que vous m'aidiez au moins sur une ligne ex ; Order intake (prise de commande) histoire de comprendre le code.
Et également que la macro fasse sur toutes les affaires.

J'ai plus ou moin réussi a faire quelque chose pour que le code déscende sur chaque affaire mais c'est pas encore tip-top :S

count = 5 ' nombre d'affaire
X = 19 ' ligne order intake
c = 4 'colonne 4

i = 1
For i = 1 To Count

Cells(X + (i + 38), c).Select

Selection.Copy

Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False

Next i

Merci par avance pour votre aide !
Mulpha