=> solution
j'ai résolu mon probleme avec la fonction DateAdd()
Cells(a + 3, 2) = DateAdd("m", a, CopyEcheance1)
avec
"m" pour mois,
a mon compteur,
CopyEcheance1 ma date au format dd/mm/yyyy
je remercie ceux qui se sont penchés sur mon probleme
(vous inquiétez pas , je reviendrais sous peu ;-) )