AW: Da fehlt ein einfaches Beispiel für Laien wie mich
09.04.2018 09:46:33
snb
@Lupo1
Es gibt eine Beispieldatei im Webpage.
Hast du die schon heruntergeladen ?
Die Webseite ist für VBA.
Und die Website ist für 'Smarties' (nicht für Laien).
Man kann in VBA mit Functions arbeiten. Das geht anders als ein UDF.
Ein VBA-Function UDF.
Ein UDF würde für Excel-Anwender sein: das ist nicht das Publikum für www.snb-vba.eu.
Ich kann hier keine Datei hochladen (weder .xlsb noch .zip).
Du kannst in der Beispieldatei diese UDF erstellen.
Function F_snb(sn)
sn = sn
ReDim sp(UBound(sn) - 1, UBound(sn) - 1)
For j = 0 To UBound(sp)
For jj = j To UBound(sp)
y = sn(j + 1, jj + 1)
For k = 0 To j - 1
y = y - sp(j, k) * sp(jj, k)
Next
If j = jj Then sp(j, j) = Sqr(y)
If j jj Then sp(jj, j) = y / sp(j, j)
Next
Next
F_snb = sp
End Function
Und in sheets("Cholesky")in A70:AC98 : Arrayformel : =F_snb(A1:AC29)