Hallo!
ich möchte meine Tabelle mit normalverteilten Zufallsvarialen, die ich in array gespeichert habe, mit der anderen Matritze multiplizieren. Ich habe hier MMULT WorksheetsFunction genutzt, bekomme aber stänfig ein Fehler 13' "unverträgliche Datentype". Unten habe ich mein code gegeben. Ich wäre sehr dankbar, wenn jemand mir helfen könnte......
Sub ppp()
Dim i As Long
Dim j As Long
Dim a As Variant
Dim c As Variant
Dim arr(1 To 100, 1 To 5)
b = Sheets("Tabelle2").Range("B1:B20").Value
With Sheets("Tabelle1")
For i = 1 To 100
For j = 1 To 5
arr(i, j) = Application.WorksheetFunction.NormDist(Rnd(), 0, 1)
Next j
Next i
a = arr
b = WorksheetFunction.MMult(arr, b)
End Sub
Vielen Dank in Voraus!
Beste Grüße Kate :-)
|