SUMPRODUCT jusqu'à la dernière ligne Résolu

Question

Bonjour, 

Je voudrais faire un somprod sur toute une colonne (jusqu'a la derniere ligne non vide), le problème est que je dois mettre cette formule dans un tableau, voici le code :

Montab = Sheets("Résultats données mât").Range("D22:AA31").Value 'Creer un tableau virtuel 

            For cmpt1 = LBound(Montab, 1) To UBound(Montab, 1)
                For cmpt2 = LBound(Montab, 2) To UBound(Montab, 2) 'On parcour le tableau
                    Montab(cmpt1, cmpt2) = "=SUMPRODUCT(('Données calculs'!RC4<RC3+0.5)*('Données calculs'!RC4>=RC3-0.5)*('Données calculs'!RC5=0)*('Données calculs'!RC7=R18C3)*('Données calculs'!RC8=R21C)*('Données calculs'!RC9=R20C)*('Données calculs'!RC11=1))"
    'On place la formule dans chaque case
                Next cmpt2
             Next cmpt1
        Sheets("Résultats données mât").Range("D22:AA31").Value = Montab 'On inject les données du tableau virtuel dans notre vrai tableau excel


Le probleme est comment lui dire de faire les recherche dans toute la colonne ? J'ai mit RC4 pour dire tout les ligne de la colonne 4, mais cela ne fonctionne pas...
 Merci de votre aide :)


Configuration: Windows 7 / Chrome 40.0.2214.115

Le Pingou · Answer

Bonjour,
Au passage, et si vous expliquiez ce que vous devez calculez et avoir comme résultat et non pas ce que vous faites.....se serait plus compréhensible et probablement qu'il n'est pas nécessaire du VBA.

eriiic · Answer

Bonjour,

On ne sait pas comment sont tes données (toujours joindre un fichier de travail réduit) mais j'ai l'impression qu'un TCD est possible. Ca sera beaucoup plus rapide (à faire et pour calculer les résultats.
Tableau Croisé Dynamique (TCD) : http://www.mdf-xlpages.com/modules/publisher/item.php?itemid=109

eric

Cactophile · Answer

Bonjour erric, j'ai changer de pseudo mais c'est tjs Lo!

Je ne peux pas poster le code car c'est pour le boulot, mais voici des image qui pourront, je l'espere eclaircir mon problème :


Voici le tableau de données que je doit classifier, l'idées est de remplir le tableau suivant :


Qui recapitule tout les cas possible et compte le nombre de point correspondant à chaque catégorie. Avec un TCD lorsque certaine catégorie n'existe pas il me renvoit #REF! plutot que des 0 ...

Et il faudrait que tout ces résultats ce mettent a jour automatiquement lorsque l'utilisateur télécharge les données, dois-je forcément passer par du VBA pour cela ?

Encore merci !
Je bloque la dessus depuis plusieurs jours !!
Merci meric !!

Cactophile · Answer

Bonjour,
J'ai réussi à m'en sortir avec un tableau croisé dynamique qui ce met à jour grâce à une petit macro !

Merci bcp de votre aide !!

Cactophile · Answer

Merci bcp eric, ta solution va me servir pour un autre fichier du même genre ;) !

J'ai une autre question qui paraît bcp plus simple :
J'ai des données de vents chiffrées (qui représente le degrées de déclagae avec le Nord) et je voudrai à chaque chiffre associé la lettre correspondante.

Pour le moment ma solution est tres basique et pas optimiser du tout :
J'imbrique pleins de SI pour avoir mon résultats final.
 Peut etre la solution d'Eric peut etre utiliser dans ce cas aussi mais je ne voit pas tres bien comment ...

Quelqu'un a une solution pour simplifier le code ?

Mon fichier excel pour comprendre mieux :
https://www.cjoint.com/c/ECnrHOBmqYw

Merci !!

SUMPRODUCT jusqu'à la dernière ligne

5 réponses

Discussions similaires

Newsletters