1

2 つのデータ ポイントに対して TTest 式を実行したいのですが、「WorksheetFunction クラスの TTest プロパティを取得できません」というエラーが表示され続けます。これが私のコードです。どこが間違っていますか?

Sub a()

Dim Z As Double

Z = Application.WorksheetFunction.TTest(Sheet1.Cells(1, 2), Sheet1.Cells(2, 1), 2, 1)

MsgBox "value is " & Z

End Sub
4

1 に答える 1

0

functionの最初の 2 つのパラメーターは、TTest範囲/配列でなければなりません。

Sub a()

Dim Z As Double

Dim rng1 As Range
Set rng1 = Range("A1:A2")

Dim rng2 As Range
Set rng2 = Range("B1:B2")

Z = WorksheetFunction.TTest(rng1, rng2, 2, 1)

MsgBox "value is " & Z

End Sub

ここに画像の説明を入力

構文 このリンクも参照してください

ここに画像の説明を入力

于 2013-05-24T03:56:27.293 に答える