slope function with matrix columns as arguments

[adam_6242]

Hello all:

Here is my setup. I have filled n x 3 matrix with values. I would like to
regress columns 1 and 2 of the matrix, individually, against column 3 using
the Slope application. However, I cannot access the columns correctly to
place as the Slope arguments. A sample of my code is below. Suggestions to
my problem are greatly appreciated. Thanks.


For i = 1 To 2
Value(i) = Application.WorksheetFunction.Slope(Matrix.Application.Columns
(i),
Matrix.Application.Columns(3))

MsgBox ("Value " & Value(i))

Next i

 

[Dana DeLouis]

However, I cannot access the columns correctly...

Hi. One way is via Index ...

Sub Demo()
Dim M As Variant
Dim Slp As Double
Dim C As Long

M = [A1:C10].Value
With WorksheetFunction
For C = 1 To 2
Slp = .Slope(.Index(M, 0, 3), .Index(M, 0, C))
Debug.Print Slp
Next C
End With
End Sub

 

[adam_6242]

Dana:

Thank you for your insights - I applied your suggestions and the code now
works!! I am now aware of the Index functionality - thanks again

However, I cannot access the columns correctly...

Hi. One way is via Index ...

Sub Demo()
Dim M As Variant
Dim Slp As Double
Dim C As Long

M = [A1:C10].Value
With WorksheetFunction
For C = 1 To 2
Slp = .Slope(.Index(M, 0, 3), .Index(M, 0, C))
Debug.Print Slp
Next C
End With
End Sub

Hello all:

[quoted text clipped - 16 lines]

Next i