Formule matricielle VBA

Bonjour,

Arrivant à la limite de ressource d'excel, je desire implémenter en vba un module avec la formule ci dessous :

ma formule est placé sur la ligne 8 à l'origine
L = ligne

Code:

---

cells(L,3)=INDEX('Warrants tri'!$A:$A;MATCH(1;('Warrants tri'!$G:$G='Reporting Warrant'!C8)*('Warrants tri'!$B:$B='Reporting Warrant'!U8)*('Warrants tri'!$C:$C='Reporting Warrant'!E8)*('Warrants tri'!$D:$D='Reporting Warrant'!H8)*('Warrants tri'!$H:$H='Reporting Warrant'!Y8);0);1)

---

Pouvez vous m'assister ?

Cordialement

Je ne comprends pas ce que tu veux dire par "implémenter un module". :koi:

Peut-être ça :

Code:

---

Cells(L,3).FormulaLocal = "INDEX('Warrants tri'!$A:$A;MATCH(1;('Warrants tri'!$G:$G='Reporting Warrant'!C" & L & ")*('Warrants tri'!$B:$B='Reporting Warrant'!U" & L & ")*('Warrants tri'!$C:$C='Reporting Warrant'!E" & L & ")*('Warrants tri'!$D:$D='Reporting Warrant'!H" & L & ")*('Warrants tri'!$H:$H='Reporting Warrant'!Y" & L & ");0);1)"

---

Salut

Citation:

---

Envoyé par damijoo

Arrivant à la limite de ressource d'excel, je desire implémenter en vba un module avec la formule ci dessous :

---

Si tu expliquais un peu plus les limitations que tu rencontres et dans quel contexte tu les rencontres, nous pourrions peut-être te proposer des solutions sans VBA.
Je n'ai pas regardé plus que ça la formule en question mais elle ne semble pas si terrible :)

++
Qwaz

Bonjour,

Merci pour votre retour encore. Et en effet j'aurais du etre plus précis dans ma demande c'est clair.

Cependant, votre solution me fait avancer et donc merci.

un petit detail ma formule est une formule matricielle et donc pour fonctionner elle à besoin d'un Maj + ctrl + enter, ici comment palier au probleme ?

un formulaarray ? et du coup quelle est la synthaxe ? (PS : j'ai essayé cela ne marche pas)

Merci d'avance

Oui FormulaArray
tu peux tester ta formule dans Excel, puis utiliser l'enregistreur de macro quand elle est au point pour avoir un point de départ de la formule en VBA

Tu peux joindre ton fichier ?

Bonjour,

Malheureusement je ne peux pas joindre le fichier, mon part feu me ne le permet pas.

Quand j'utilise Formule Array cela me copy bien la formule mais n'active pas la version matricielle


bien à vous

Ton

Code:

---

1 2 3 4

INDEX('Warrants tri'!$A:$A;EQUIV(1;xx;0);1) 'index(matrice,n°lige,n°col) avec matrice = 'Warrants tri'!$A:$A et n° colonne = 1 (A) ==> OK 'Equiv(valeur_cherche, table de recherche, 0) avec valeur cherche=1, table de recherche = XX, 0 pour ne pas de valeur proche : NA si non trouvé

---

Dans equiv tu mets une operation (renvoie au mieux un nombre) au lieu de mettre une table de recherche


Ta formule ne convient pas, tu pourrais essayer de faire un petit fichier excel contenant le minimum pour tester et de le deposer ?

ok je vous transmets cela des que possible

merci pour vos inputs

Bonjour,

Une chose qu'il faut savoir, pour utiliser FormulaArray (pour que la formule soit matricielle en VBA), il faut que la formule soit en référence R1C1 sinon, ça ne marche pas !
Construis ta formule dans une cellule puis ceci fait, tu la sélectionnes et tu vas dans la fenêtre d'exécution, tu colles cette ligne de code puis touche Entrée, dessous tu auras ta formule en référence R1C1 :

Code:

---

1 2	?activecell.FormulaR1C1

---

Saches aussi que VBA ne connait pas le point-virgule !

Bonjour,

Si tu n'aimes pas R1C1, pour pallier aux manque de possibilités de type d'écriture pour FormulaArray, tu l'écris en 'normal' et tu revalides en matriciel :
[

Code:

---

[A1].FormulaArray = [A1].Formula

---

Mais R1C1 présente parfois des avantages, surtout si tu appliques ta formule sur une plage.
eric

Bonjour,

Donc malheureusement je ne peux pas exporter de fichier.

Je vais essayer de poster à nouveau la demande.

voici mon code :

Code:

---

1 2 3

Range("L8").Select Selection.FormulaArray = _ "=INDEX('Warrants tri'!C1,MATCH(1,('Warrants tri'!C7='Reporting Warrant'!RC[-9])*('Warrants tri'!C2='Reporting Warrant'!RC[9])*('Warrants tri'!C3='Reporting Warrant'!RC[-7])*('Warrants tri'!C4='Reporting Warrant'!RC[-4])*('Warrants tri'!C8='Reporting Warrant'!RC[13]),0),1)"

---

Mon problème est que la validation ctrl + maj + enter , ne fonctionne pas.

Pouvez vous m'assister

merci d'avance

Bonjour,

Citation:

---

Quand j'utilise Formule Array cela me copy bien la formule mais n'active pas la version matricielle

---

Vraiment ? Tu as quelle version d'excel ?

Moi, sur 2010, elle ne s'inscrit pas. Erreur 1004
.FormulaArray est limité à 255 caractères et la tienne en fait 271
eric

Dans equiv=Match tu mets une operation (renvoie au mieux un nombre) au lieu de mettre une table de recherche :zoubi:

ah des pistes :)

Pour moi la partie match de ma formule fait le renvoie si true , non ?

De plus, avez vous un moyen de contourner le problème en adaptant ma formule ?


Merci encore pour l'aide

match= equiv(valeur cherche, table, 0)
tu ne donne pas une table mais un produit de condition => renvoi un nombre … qui n'est donc pas une table de recherche
ta formule ne convient pas

une piste
ecrit ta formule dans Excel par exemple en L2, jusque ce qu'elle marche
clique sur enregistrer une macro
clique sur l2
va dans la barre de formule .. a la fin : ENTREE
arrete l'enregistreur de macro
tu auras une idée de la formule a ecrire

alors sauf mauvaise interpretation de ma part la formule marche très bien. Donc sur la fonctionnalité le souci n'est pas locallisé la.

Par contre sur la taille ou autre la c'est une autre histoire.

Actuellement, je l'utilise et la tire après.

Le mode opératoire , est entrer la formule et la valider une fois grace à "maj + ctrl + enter".

J'ai aussi réalisé une macro copier/coller le contenue de la case ou la formule est. Dans le cas ou elle a été pré validée cela marche.

Mon objectif est de ne plus avoir à faire cela et limiter le risque d'erreur (ex commun : une suppression d'un tier de la case de base ou est la formule validée), en entrant sous vba la formule comme je le fait pour d'autre.