Remplacer une formule contenant "SUMPRODUCT"

[BChaly]

Bonsoir à tous,

"SUMPRODUCT" semblant prendre beaucoup de temps pour exécuter les opérations lorsque l'on a trop de données, y-a-t-il une possibilité de remplacer la fonction "SUMPRODUCT" dans la formule suivante?:

=SUMPRODUCT(($B$6:$B$15=H$5)*($C$6:$C$15=$G6))

Ci-joint un exemple (abrégé) des données que je souhaite obtenir.

Cordialement,

BChaly

 

[Misange]

Re : Remplacer une formule contenant "SUMPRODUCT"

Re bonjour

Ta solution ne résous pas grand chose :
au lieu d'écrire toi même la formule dans les cellules tu le fais par macro mais in fine tu as toujours une formule sommeprod dans tes cellules et à l'ouverture du classeur et à chaque modif des valeurs dépendantes, toutes tes cellules seront réévaluées... Bonjour le temps de calcul sur 35000 lignes !
ce que je te proposais est très différent : tu fais le calcul sommeprod par VBA et tu ne places que le résultat dans les cellules (sans formule).
Tu ne lances la macro que lorsque c'est nécessaire à l'actualisation de tes données.

Voici une macro qui fait le boulot pour le premier de tes tableaux (qté 1)

Sub evaluesommeprod()
'misange 2011
Dim L As Long, C As Long

With Sheets("sheet1")
    For L = 6 To 15
        For C = 8 To 13
        .Cells(L, C).Value = evaluate("SUMPRODUCT(--(nom=" & .Cells(5, C).Address & "),--(qté1=" & .Cells(L, 7).Address & "))")
        Next C
    Next L
End With
End Sub

 

[BChaly]

Re : Remplacer une formule contenant "SUMPRODUCT"

Effectivement, cette dernière solution est beaucoup plus "professionnelle" et je n'aurais pas pu touver ceci tout seul.

Merci encore fois pour l'intérêt porté à mon problème.

Cordialement,