[Résolu] Inserer une formule matricielle par vba

jmps

Nous a quitté

Repose en paix

• 13 Avril 2013

• #2

Re : Inserer une formule matricielle par vba

Bonjour Lone-wolf,

Avec l'enregistreur de macros j'obtiens ça pour la première formule (en sélectionnant J3 d'abord) :

Code:

Selection.FormulaArray = _
        "=IF(IF(ISERROR(MATCH(RC&R[1]C,R[1]C[-8]:R[4999]C[-8]&R[1]C[-7]:R[4999]C[-7],0)),TRUE,INDEX(R[1]C[-6]:R[4999]C[-6],MATCH(RC&R[1]C,R[1]C[-8]:R[4999]C[-8]&R[1]C[-7]:R[4999]C[-7],0))=0),"""""""",INDEX(R[1]C[-6]:R[4999]C[-6],MATCH(RC&R[1]C,R[1]C[-8]:R[4999]C[-8]&R[1]C[-7]:R[4999]C[-7],0)))"

A toi de voir et d'adapter. La clé c'est qu'en VBA il faut utiliser les fonctions en anglais.

 

Vote positif 0 Vote négatif

Modeste geedee

XLDnaute Barbatruc

• 13 Avril 2013

• #3

Re : Inserer une formule matricielle par vba

Bonsour®
il faut ecrire form1 et form2 au format US
form1="IF(IF(ISERROR(MATCH(J1&J2,B2:B5000&C2:C5000,0)),TRUE,INDEX(D2😀5000,MATCH(J1&J2,B2:B5000&C2:C5000,0))=0),"""",INDEX(D2😀5000,MATCH(J1&J2,B2:B5000&C2:C5000,0)))"

!!! les ";" sont remplacés par ","

 

Dernière édition: 13 Avril 2013

Vote positif 0 Vote négatif

Lone-wolf

XLDnaute Barbatruc

• 13 Avril 2013

• #4

Re : Inserer une formule matricielle par vba

Bonjour jmps, Modeste geedee 😀

@jmps: j'ai essaié avec l'enregistreur, mais ça ne marche pas. J'obtien l'erreur 1004 : Impossible de définir la propriété FormulaArray de la classe Range.

@Modeste geedee : c'est toujour pareil.

Sinon, comment simuler l'activation des touches Ctrl+Shift+Enter??

A+ 😎

 

Dernière édition: 13 Avril 2013

Vote positif 0 Vote négatif

Modeste geedee

XLDnaute Barbatruc

• 13 Avril 2013

• #5

Re : Inserer une formule matricielle par vba

Bonsour®

😕 quoi c'est toujours pareil ...
as-tu verifié :
- si la formule fonctionne correctement quand tu la saisie manuellement en J3 ou J4
- le format initial de j3 ou J4 (standard)
- enlevé le "ESTERREUR" afin de voir justement s'il y a erreur et son type

 

Vote positif 0 Vote négatif

Lone-wolf

XLDnaute Barbatruc

• 13 Avril 2013

• #6

Re : Inserer une formule matricielle par vba

Bonsoir Modeste,

oui, j'ai tout essaié, mias rien à faire. Alors j'ai trouvé une parade. J'ai décalé les deux formules de quelques cellules et dans la macro inscrite dans la feuille j'ai écrit : Range("j3").value = Range("j51").value idem pour J4.

Je cherchais à recopier les formules, parce que les lignes 1 à 6 sont éffacés sous condition.

La solution était tout simple et non seulement je me suis cassé la tête avec ça, mais je vous ai embêtés pour rien, désolé 😱 .


Très bon weekend à tous. 😎

 

Vote positif 0 Vote négatif