Passer d'une formule Excel Enregistree avec macro record R1C1 en dynamique

Ma formule est la suivante :

Code:

---

1 2	"=SUMPRODUCT(MMULT(R[-31]C[-2]:R[-31]C[17],R[-26]C[-2]:R[-7]C[17]),R[-31]C[-2]:R[-31]C[17])" Range("D34").Select

---

Sauf que la complication arrive :lol:

Mon calcul matricielle ne prend pas forcement la meme matrice a chaque fois. C est une matrice carree N*N ou N est variable.

Je dois imperativement metre ca sous forme de formule car je vais utiliser le solveur après

La notation en rouge fonctionne mais je ne veux pas ce format ------
¦
¦
¦

Cells(nr + 2, 2) = WorksheetFunction.SumProduct(WorksheetFunction.MMult(Range(Cells(2, 2), Cells(2, nc)), Range(Cells(7, 2), Cells(7 + nmtitres - 1, nc))), Range(Cells(2, 2), Cells(2, nc)))



Merci pour votre aide

A première vue, il te manque des .value après cells() et Range()

Code:

---

Cells(nr + 2, 2).value = WorksheetFunction.SumProduct(WorksheetFunction.MMult(Range(Cells(2, 2), Cells(2, nc)).value, Range(Cells(7, 2), Cells(7 + nmtitres - 1, nc)).value), Range(Cells(2, 2), Cells(2, nc)).value)

---

La formule en rouge fonctionne mais je ne la veux pas dans ce format la ... Je pense aue tu devrais relire le message je sais que ce n'ai pas tres simple a comprendre... fais moi signe si tu as besoin de plus de details

Je ne veux donc pas utiliser le format de formule en rouge

Je pense que si tu nous expliquais plus clairement ta demande cela aiderait car selon moi la remarque de Kiouane est plus que pertinente :mrgreen:

Quel format veux tu ? Qu'es ce que N (j'entends par la d'ou vient il) ? A quel moment intervient il ? etc.

Pour faire plus simple je vais prendre une formule plus abordable :

Je voudrais convertir ceci :

Code:

---

1 2	ActiveCell.FormulaR1C1 = _ "=SUMPRODUCT(R[-32]C[-2]:R[-32]C[17],R[-31]C[-2]:R[-31]C[17])"

---

En quelque chose comme ca :

Code:

---

1 2 3

ActiveCell.FormulaR1C1 = _ "=SUMPRODUCT(&Cellls(2,2).address : &Cellls(2,dernierecolonnematrice).address ,(&Cellls(2, 3).address : &Cellls(2,dernierecolonnematrice).address

---

je pense que c'est possible mais ma sintaxe n est pas bonne. Soit c est une pb de "" soit de &. Est ce plus clair ?

Bonjour,
Pourquoi écris-tu tes formules avec le style R1C1 ?
A lire éventuellement les deux billets Ecrire une formule dans Excel à l'aide d'une procédure VBA et Ecrire une formule dans Excel à l'aide d'une procédure VBA (Part 2)

Je suis oblige de l ecrire en R1C14 car je vais utiliser le solver après avec la solution ...

Tout à fait :mrgreen:

Code:

---

1 2	ActiveCell.FormulaR1C1 = _ "=SUMPRODUCT(" & Cells(2, 2).address & ":" & Cells(2,dernierecolonnematrice).address & "," & Cells(2, 3).address & ":" & Cells(2,dernierecolonnematrice).address & ")"

---

PS : j'ai pas vérifié si ca fonctionne

Merci si tu arrives aussi a me traduire celle la tu serais un ange hahaha

Code:

---

1 2	"=SUMPRODUCT(MMULT(R[-31]C[-2]:R[-31]C[17],R[-26]C[-2]:R[-7]C[17]),R[-31]C[-2]:R[-31]C[17])" Range("D34").Select

---

Je l'ai fait tout seul cependant il y a un probleme :

Code:

---

Cells(nr + 6, 2) = "=SUMPRODUCT(" & Cells(2, 2).Address & ":" & Cells(2, nc).Address & "," & Cells(3, 2).Address & ":" & Cells(3, nc).Address & ")"

---

Me donne :

Code:

---

=SUMPRODUCT($B$2:$P$2,$B$3:$P$3)

---

J aimerai avoir :

Code:

---

=SUMPRODUCT(B2:P2,B3:P3)

---

Ca serait parfait merci beaucoup

Bonjour,

toujours consulter l'aide en ligne ... on oublie facilement que certaines propriétés disposent de paramètres à force de ne jamais en avoir besoin

http://www.developpez.net/forums/d15...a/#post8654986