Ajouter des valeurs

3 pièce(s) jointe(s)

Ajouter des valeurs

Bonjour à tous et à toutes !
J'aurais bien besoin d'un petit coup de mains.
Voilà mon soucis, 2 fichiers, Economat 1 et Achats Fournisseurs 1, à ouvrir en même temps (fichiers simplifiés)

Les données des lignes dans Achats Fournisseurs sont récupérées avec "indirect" dans Economat, donc variables quand à leurs positions.

Je souhaite avoir une macro que j'exécuterai avec un bouton de commande, chaque semaine et qui ajoute les valeurs de la colonne E, aux valeurs de la colonne I (valeurs correspondant à un total annuel).
Soit pour I7 correspondant à la ligne abricot =14 (8+6), I8 correspondant à la ligne abricots au sirop =15 (4+11) etc ...
.
Voilà si quelqu'un à une idée ...je veux bien.
Merci en tout cas de vous penchez sur ce dilemme. Philippe M.

PS: j'ai essayé avec un macro récupérée de classeur1 où le total se fait de B vers S

Pièce jointe 402394, Pièce jointe 402396, Pièce jointe 402398, mais pas moyen non plus

Peut-être ?

Code:

1
2
3
4
 
    Range("J4").FormulaR1C1 = "=SUM(R7C5:R1000C5)+SUM(R7C9:R1000C9)" ' ligne 7 a 1000 / colonnes 5(E) et 9(I)
    Range("J4").Calculate
    Range("J4").FormulaR1C1 = Range("J4").Value

suite discussion

Je vais essayé cela, merci de votre participation.
Cordialement, Philippe M.