Hello Staple1600, le forum
Je reviens sur le sujet pour un suivi final.. Je pensais pas que mon "projet" t'intéresserait.
J'ai avancé de mon côté concernant les besoins de traitement. J'ai glissé un fichier de l'avancé.
Je pense que le code est beaucoup trop fastidieux pour excel puisqu'il m'indique :
Il me manque une dernière formule à indiquer.
J'aimerais pouvoir faire le rapport suivant :
Cells(x + 1, y + 2) = Application.WorksheetFunction.Sum(Range(Cells(3, y), Cells(x + 1, y)))
'/ WsSource.Application.WorksheetFunction.Sum(Range(Cells(2, dercol + 1), Cells(x - 1, dercol + 1)))
Si jamais tu as des remarques et/ou conseils, ils seront la bienvenue !
PS : Je sais que mon code est pas le meilleur, j'ai fais du mieux que je pouvais
Bonne journée.
OOLIVE