Modifier une formule avec VBA pour inclure les nouveaux classeur
Résolu
Arbra
-
Arbra -
Arbra -
Bonjour,
J'ai un soucis avec un code VBA, je cherche a compléter une formule excel existante lorsque je créé un nouveau classeur. La partie soulignée est la ou je recois une erreur, j'ai essayé beaucoup de formulations mais aucune ne semble marcher.
Sub Macro1 ()
Sheets("Part 1").Select
Sheets("Part 1").Copy Before:=Sheets(5)
Sheets("Part 1 (2)").Select
Sheets("Part 1 (2)").Name = "New Part"
Sheets("Raw Materials").Select
Range("J4").Select
ActiveCell.FormulaR1C1 = FormulaR1C1 & "+SUMIF('New Part'!$F$9:$F$17,B4,'New Part'!$V$9:$V$17)"
End Sub
Merci de votre aide
J'ai un soucis avec un code VBA, je cherche a compléter une formule excel existante lorsque je créé un nouveau classeur. La partie soulignée est la ou je recois une erreur, j'ai essayé beaucoup de formulations mais aucune ne semble marcher.
Sub Macro1 ()
Sheets("Part 1").Select
Sheets("Part 1").Copy Before:=Sheets(5)
Sheets("Part 1 (2)").Select
Sheets("Part 1 (2)").Name = "New Part"
Sheets("Raw Materials").Select
Range("J4").Select
ActiveCell.FormulaR1C1 = FormulaR1C1 & "+SUMIF('New Part'!$F$9:$F$17,B4,'New Part'!$V$9:$V$17)"
End Sub
Merci de votre aide
1 réponse
-
bonjour,
Sans regarder en détail votre code ... je pense que tu devrais déjà utiliser FormulaLocal au lieu de R1C1
La syntaxe pour les utiliser étant très différentes
Par exemple :ws.Range("A14").FormulaLocal = "=SOMME(A4:A6)" ws.Range("A15").FormulaR1C1 = "=Sum(R[-11]C:R[-9]C)"
NB : si ton excel est en Anglais, tu écris SUM au lieu de SOMME dans le formulaLocal bien entendu.
