Modifier formule récupérer

Bonjour,
j'aurais voulu savoir comment faire pour modifier la formule ce trouvant dans une cellule, j'arrive a récupérer la formule comme ceci
Range("b356").FormulaR1C1Local

qui me donne comme résultat un truc du genre
"=SUM(R[-350]C,R[-336]C,R[-322]C,R[-308]C,R[-294]C,R[-280]C,R[-266]C,R[-252]C,R[-238]C,R[-224]C,R[-210]C,R[-196]C,R[-182]C,R[-168]C,R[-154]C,R[-140]C,R[-126]C,R[-112]C,R[-98]C,R[-84]C,R[-70]C,R[-56]C,R[-42]C,R[-28]C,R[-14]C,R[13]C,R[18]C)"

mais je comprend strictement rien comment rajouter un truc du genre B370 ?( qui augmentera a que fois que l'on ajoute un poste b ne changera jamais le numéro de ligne prend +14 a chaque fois)

Merci d'avance,

2 réponses

  • Votes
  • Date
  • Date décroissante
  1. Contributeur
    Bonjour
    Range("b356").FormulaLocal
    1. salut avec plus de détail ca donne car ca c'est que je fais déjà pour récupéré la formule
      mois ce que je veux c'est récupérer cette formule et insérer a celle ci tu me rajout ,R[14]C
      mais je ne sais pas comment faire pour ajouter R[14]C a ma formule récupéré quand je fais Range("b356").FormulaLocal
  2. Bonjour,

    Pour rajouter un élément, tu fais

    formule = Range("b356").FormulaR1C1Local
    formule = left(formule, len(formule)-1)
    formule = formule & ", R[14]C)"

    --