Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1084to1088
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Wahrscheinlichkeitsfunktion in Excel

Wahrscheinlichkeitsfunktion in Excel
Jan
Hallo zusammen
Wie kann ich die Funktion "n tief k" in Excel berechnen?
Gruss Jan und danke für die Hilfe!

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Wahrscheinlichkeitsfunktion in Excel
29.06.2009 11:00:48
Jogy
Hi.
Meinst Du den Binomialkoeffizienten?
=MULTINOMIAL(k,(n-k))
Gruss, Jogy
Ergänzung:
29.06.2009 11:04:46
Jogy
Nachtrag: Sorry, das war jetzt der englische Name (habe hier eine Mulitlanguage-Version von Excel), auf Deutsch heißt das POLYNOMIAL. Das AddIn "Analysfunktionen" muss übrigens aktiviert sein.
Wenn Du es ohne machen willst, dann berechne es doch einfach mit der FAKULTÄT-Arbeitsblattfunktion. So komplex ist das ja jetzt auch wieder nicht.
Gruss, Jogy
AW: Ergänzung:
29.06.2009 11:23:04
Jan
Vielen Dank für die Hilfe!
Werde mich mal ins Zeug hauen!:)
Schönen Tag noch!
Gruss Jan
AW: Ergänzung:
29.06.2009 11:40:32
Jogy
Hier noch eine UDF, die weit größere Zahlen verarbeiten kann als Excel selbst:

' Berechnet den Binomialkoeffizienten
Public Function BINOMIAL(ByVal n As Double, k As Double) As Variant
Dim i As Long
On Error GoTo errHand
' Mögliche Fehler abfangen
If Abs(CLng(n))  n Or Abs(CLng(k))  k Then
BINOMIAL = CVErr(xlErrNum)
' Einfach Werte (nächste 3 Abfragen)
ElseIf k > n Then
BINOMIAL = 0
ElseIf k = n Or k = 0 Then
BINOMIAL = 1
ElseIf k = 1 Or k = n - 1 Then
BINOMIAL = n
' Berechnung des Binomialkoeffizienten
Else
' Da "n über k" = "n über (n - k)" wird das Minimum von
' k und n-k verwendet
If 2 * k > n Then k = n - k
' Startwert
BINOMIAL = 1
' Berechnungalgorithmus (laut Wikipedia)
For i = 1 To k
BINOMIAL = BINOMIAL * (n + 1 - i) / i
Next
End If
'ggf. Rückgabe Fehlerwert
errHand:
If Err.Number  0 Then BINOMIAL = CVErr(xlErrNum)
End Function

Gruss, Jogy

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige