[Eine Seite zurück] [Übersicht] [Eine Seite vor]

Benutzung auf eigene Gefahr !
Keine Garantie für garnichts !

Pascalsches Dreieck

Sprache / Programm: Excel ab Version 97
Beschreibung

Das Programm berechnet eine Zeile aus dem Pascalschen Dreieck und gibt diese als Zeilenvektor zurück.

Die Funktion ist ein gutes Beispiel, wie man mit einer Tabellenfunktion in Excel mehrere Werte in mehrere Zellen zurückgeben kann.

VBA-Quelltext
' Berechnet eine Zeile des Pascalschen Dreiecks
Public Function PascalDreieck(n As Long)
    Dim i As Integer, j As Integer
    ReDim p(0 To n) As Long
   
    p(0) = 1
   
    For i = 1 To n
        For j = i To 1 Step -1
            p(j) = p(j) + p(j - 1)
        Next j
    Next i
   
    ' Rückgabe als Zeilenvektor
    PascalDreieck = p
End Function
Argumente der Funktion/Prozedur

n

Zeile des Pascalschen Dreiecks. Es muss n>0 gelten.

Rückgabewert

Der Rückgabewert ist ein eindimensionales Array, das Werte in den Feldern 0 bis n enthält.

Anwendungsbeispiel(e)...

PascalDreieck(4) liefert ein Array mit dem Inhalt array(1, 4, 6, 4, 1),

PascalDreieck(6) liefert ein Array mit dem Inhalt array(1, 6, 15, 20, 15, 6, 1)

Hinweis

Damit die Funktion das gewünschte Ergebnis liefert, muss zunächst der Bereich im Tabellenblatt markiert werden, in den die Ergebnisse ausgegeben werden sollen. Im Falle von PascalDreieck(4) werden 5 Werte zurückgegeben, d.h.

  • zunächst werden 5 nebeneinander liegende Zellen markiert

  • Eingabe der Funktion =PascalDreieck(4) ohne die Markierung zu verändern

  • Eingabe nicht mit der Eingabetaste, sondern wie eine Matrixformel mit Umschalt+Strg+Eingabetaste (gleichzeitig, auf englischen Tastaturen: Shift+Ctrl+Enter) abschließen.

Bei dieser Art von Funktionen ist der Typ des Rückgabewertes immer Variant, da nur im Variant ein Array (Feld) gespeichert werden kann.