Inserer une formule en VBA

[ClemSintef]

Bpnjour,

J'ai ecrit un code qui fonctionne et dans lequel il y a une formule. Pour faciliter les changements que d'autres collaborateurs auraient a faire dans le futur, je voudrias simplifier un peu ma formule

J'ai ca: ActiveCell.FormulaR1C1 = _
"=DAVERAGE(R2C1:R2562C3,R2C[-7],R2C8:R3C8)"

Je souhaiterais obtenir quelquechose comme ca: ActiveCell.FormulaR1C1 = _
"=DAVERAGE(R2C1:R End_table C Start_table ,R2C[-7],R2C8:R3C8)"

avec
Dim End_table As Integer
End_table = 2562
Dim Start_table As Integer
Start_table = 3

Merci par avance!

 

[ERIC S]

Re : Inserer une formule en VBA

Bonjour

a essayer
ActiveCell.FormulaR1C1 = _
"=DAVERAGE(R2C1:R" & End_table C Start_table & " ,R2C[-7],R2C8:R3C8)"

 

[francedemo]

Re : Inserer une formule en VBA

bonjour

j'écrirai plutôt :

ActiveCell.FormulaR1C1 = _
"=DAVERAGE(R2C1:R" & End_table" & "C" & Start_table & " ,R2C[-7],R2C8:R3C8)"

 

[ClemSintef]

Re : Inserer une formule en VBA

Bonjour,

Merci pour votre reponse, mais j'ai une erreur de statement avec cette expression et ca ne compile pas. ;S

 

[ClemSintef]

Re : Inserer une formule en VBA

Les deux solutions proposees me donnent des erreurs de syntaxes

 

[ERIC S]

Re : Inserer une formule en VBA

Re

effectivement j'ai lu en diagonale

a vérifier

ActiveCell.FormulaR1C1 = _
"=DAVERAGE(R2C1:R" & End_table & "C" & Start_table & " ,R2C[-7],R2C8:R3C8)"

avec un exemple, on est moins dans le vide...

 

[francedemo]

Re : Inserer une formule en VBA

zut, j'avais aussi loupé un " ...

 

[ClemSintef]

Re : Inserer une formule en VBA

Parafait! Merci vous êtes géniaux!