Probleme avec Fonction matricielle excel vba 2003

[mikil]

Bonjour,

J'ai écrit une fonction matricielle nommée BootStrapping dans le module1 du classeur ci joint. J'ai l'impression de l'avoir bien codé, le probleme c'est au niveau de l'affichage sur la feuille 1, lorsque je fait Ctrl+Maj+Enter à ma grande stupéfaction il m'affiche partout la meme valeur, alors qu'en faisant du pas à pas je me rends bien compte que cela ne devrait pas etre le cas.

J'ai tout essayé, mais là je ne vois vraiment d'ou viens le problème.
Merci d'avance pour vos suggestions.
Cf feuille1

 

[mapomme]

Re : Probleme avec Fonction matricielle excel vba 2003

Bonjour mikil,

Soit sur la feuille de calcul on passe à la transposée de la fonction. On utilise la formule:

=TRANSPOSE(bootstrapping(J21:J24;K21:K24;L21:L24;0,000001))

soit dans le code de la fonction, on termine par:

BootStrapping = Application.WorksheetFunction.Transpose(R)