Gestion d'une formule SUMIFS dans EXCEL VBA
Bonjour,
Je cherche à inscrire dans une feuille une formule "somme.si.ens" (SUMIFS) composée par la macro.
Ca fonctionne pour des cas simples mais ça me renvoie une erreur dès que je raffine la formule.
Quelqu'un a une idée pour régler ça ? Merci !
Exemple 1 (ça marche avec la première définition de toto mais pas avec la deuxième) :
Code:
1
2
3
4
5
6
7
8
9
10
| Sub Test()
Dim toto As String
'toto = "sdf"
toto = "3 fjfj"
Cells(1, 1).FormulaR1C1 = "=SUMIFS(C[1],C[2]," & toto & ")"
End Sub |
Exemple 2 (ça marche dans les 2 premiers cas mais pas dans le 3ème) :
Code:
1
2
3
4
5
6
7
8
9
10
| Sub Test2()
origine1 = ActiveSheet.Name
origine2 = ThisWorkbook.Name
'Cells(1, 1).FormulaR1C1 = "=SUMIFS(C[1],C[2],RC[3])"
'Cells(1, 1).FormulaR1C1 = "=SUMIFS([Classeur1]Feuil1!C2,[Classeur1]Feuil1!C1,RC[3])"
Cells(1, 1).FormulaR1C1 = "=SUMIFS([" & origine2 & "]" & origine1 & "!C2,[" & origine2 & "]" & origine1 & "!C1,RC[3])"
End Sub |
