VBAのworksheetfunctionのgamma_distマイサイクル

for..next：e以上VBAのworksheetfunctionのgamma_distマイサイクル

For n = 1 To 30000 Step 1 
    a = m * n 
    b = delta^a 
    c = f1^(a - 1) 
    d = WorksheetFunction.Exp(-f1 * delta) 
    e = WorksheetFunction.Gamma_Dist(f1, a, 1, 1) 
    konvolucia = (b/e) * c * d 
Next n

ランタイムerror.'423' を表示している - プロパティやメソッドが見つからない

問題がどこにあるか尋ねることはできますか？

出典

2017-05-29 Kristina

プロパティまたはメソッドが

が見つかりませんエラーメッセージ

はあなたを伝えると、問題がExpと呼ばれる全くWorksheetFunctionがないです。

あなたは、次のように定義exp機能を探している場合：e = 2.71828183…n^番目乗し
Exp(n) =e。

代わりにd = Exp(-f1 * delta)を使用してください。

サイドノート
Gamma_Distは、最後の引数としてBooleanを待っ：
Gamma_Dist(Arg1 as Double, Arg2 as Double, Arg3 as Double, Arg4 as Boolean) 
ですから、最後の引数として代わりに1のTrueまたはFalseを使用する必要があります。 VBA Trueは-1であり、Falseは0なので、0の横に何かがブール値に変換されるとTrueにキャストされても、1を使用しないでください。

出典

2017-05-29 07:12:32

どうもありがとう、私はまた、ランタイム{X = 1〜15ステップ1 G = WorksheetFunction.Binom_Dist（F1、R、Q、0） hustota = G * konvolucia 次にxについて}この機能に問題がありますエラー1004 – Kristina

回答/コメントとして質問を投稿しないでください。代わりに元の質問を編集して、エラーが発生したときにこのループを実行する変数の値を追加しますか？完全なエラーメッセージを追加し、それがどの行に表示されるか。コードを見ずに値を知ることはできません。 –

申し訳ありませんが、上記のコメントに間違った編集リンクがありました。代わりにあなた自身の元の質問**を編集して、要求されたデータをすべて追加してください（https://stackoverflow.com/posts/44236269/edit）。 –

VBAのworksheetfunctionのgamma_distマイサイクル

答えて

関連する問題