VBA의 Excel WorksheetFunction.Trend 함수

Question

Excel 셀에 수식 = TREND ({4000,20000}, {0,32}, B15)가 있습니다.

VBA 기능에서이 기능을 사용하는 올바른 방법은 무엇입니까?

내가 런타임 오류 1004가 계속 다음 WorksheetFunction 클래스의 추세 속성을 가져올 수 없습니다, 때마다의 라인을 따라 Itry 변화 :

WorksheetFunction.Trend ("{4000,20000}", "{0, 32} ","B15 ")

감사합니다.

Answer 1

수식을 Excel 셀에서 사용할 수 없습니다 (#REF 오류). 알려진 x의 값이 알려진 y의 값과 같지 않아야합니까? 이 작동

?application.WorksheetFunction.Trend(array(4000,20000),array(0.30,0.32),Range("B15").Value)(1) 

나는 첫 번째 두 인수에 대한 배열을 만들려면 배열 함수를 사용하고 있습니다. 나는 두 번째 주장에 또 다른 가치를 부여했다. 그런 다음 배열 전체를 반환하므로 배열 끝에있는 (1)은 첫 번째 요소를 반환합니다. 지방 주민을, 당신은 결과가 하나의 요소 변형 배열을 보유하고 있음을 볼 수있다 -

당신은 당신이 볼 때이

Sub TestTrend() 

    Dim aY(1 To 2) As Double 
    Dim aX(1 To 2) As Double 
    Dim vResult As Variant 

    Range("B15").Value = 0.35 

    aY(1) = 4000: aY(2) = 20000 
    aX(1) = 0.3: aX(2) = 0.32 

    vResult = Application.WorksheetFunction.Trend(aY, aX, Range("B15").Value) 

    Stop 

End Sub 

같은 서브로 결과를 검사 할 수 있습니다.