Pb VBA/ExcelRésolu

Question

[E:\Formule_A_Developper.JPG Formule] à developper: Nk suit une loi de Poisson de paramètre lambda=3 Xj suit une loi Lognormale de paramètres mu=8 et sigma=1,2 J’ai développé une fonction VBA/Excel suivant : = = = = = = = = = = = = = = = = = = = = = = = = = = = = = Function Calc_Simul(N As Integer) As Double 'N : nb iterats Dim Nk As Double Dim X As Double Dim A As Double ' N = 250 Lam = 3 Mu = 8 Sig = 1.2 Calc_Simul = 0 For k = 1 To N Nk = WorksheetFunction.Loi.Poisson(Rnd(), Lam, vrai) If Nk <> 0 Then For j = 1 To Nk X = X + WorksheetFunction.LogNormDist(Rnd(), Mu, Sig) Next j Else: X = 0 End If A = A + X Next k Calc_Simul = A End Function = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = Mais lorsque j’exécute ce programme dans Excel j’obtiens : #ERREUR ! Merci de m’aider à résoudre ce pb. Merci d'avance. Crdt, MEDI95

us_30 · Accepted Answer

Bonjour,

Forcément :
WorksheetFunction.Loi.Poisson(Rnd(), Lam, vrai)
n'existe pas !

mais la syntaxe :
WorksheetFunction.Poisson(Rnd(), lam, True)

ensuite, je ne regarde pas sur le fond, mais cela me parait être très juste non plus...

Amicalement,
Us.

PCPT · Answer

thème topic : déplacé de VB6 vers VBA

cs_MEDI93 · Answer

Salut US, Merci bcp pour votre ide mais j’avais corrigé auparavant cette erreur mais mon pgrm ne tourne tjs pas ! Peux-tu m’indiquer stp d’autre pistes ou une autre façon de programmer cette formule en VBA/Excel ? Merci d’avance. Très amicalement, MEDI

us_30 · Answer

bah... l'ennui c'est que je ne vois pas ce qu'il est sensé faire... C'est même pour ça que le fond ne me semblait pas très juste...

Amicalement,
Us.

cs_MEDI93 · Answer

le but c'est de pricer la formule "A", je l'ai fais avec Scilab (logiciel comme Matlab) ca marche bien mais avec Excel/BVA  j'ai des petits soucis!
J'essaie de le corriger aujourd'hui.

Merci.
Très amicalement,
MEDI

us_30 · Answer

"pricer" ? ... ah, bon... 

Amicalement,
Us.

PS : Dans Google, pour "pricer formule" j'obtiens "Leader Price"...

cs_MEDI93 · Answer

Pour moi "pricer" c'est programmer une formule mathématique en utilisant un langage informatique: Excel, Scilab, Matlab, C/C++, C#, ...etc.

Amicalement,
MEDI

Pb VBA/Excel

7 réponses

Votre réponse

Discussions similaires