Сохранение матрицы данных в двумерной матрице (после функции .PV) - PullRequest
0 голосов
/ 09 октября 2019

В приведенном ниже коде я выбираю две матрицы из моего листа Excel, MatrixA и MatrixB

MatrixA = [100 95,6 81 63]

и

MatrixB = [10 20 30 40]

Я пытаюсь умножить их, используя функцию Application.PV в Excel, и сохраняю их как одну двумерную матрицу, поэтомуполучить что-то вроде:

MatrixC =
Строка 1: 10 9,5 9,1 6,5;

Строка 2: 20 19,12 18,21 12,69;

Строка 3: 30 28 27 19;

Строка 4: 40 38 36 25

Однако пока мне удается получить только первый ряд. Это мой код ниже

Public Function Persistence_times_initiation(MatrixA As Variant, MatrixB As Variant)

Dim finalArray As Variant

For i = 1 To 4
   finalArray(1,i) = Application.PV(, 1, Application.PV(, MatrixA, MatrixB(1, i)))
Next i

Persistence_times_initiation = finalArray

End Function

Таким образом, первый экземпляр будет отображать

FinalArray = 1000 956 810 630

Второй экземпляр

FinalArrat = 2000 1912 1620 1260

Третий экземпляр

FinalArrat = 3000 2868 2430 1890

Четвертый экземпляр

FinalArrat = 4000 3824 3240 2520

Я пытаюсь сохранить это в матрице. Любая помощь приветствуется.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...