VBAのインデックス関数をダイナミックレンジに使用する方法

Question

n x m data arrayを取得しましたが、ループを使用せずにその配列のサブセットの平均値を計算しようとしています。

Excelでは、私は、例えば使用することができます。

x = AVERAGE(INDEX(A1:A100,20,1):INDEX(A1:A100,50,3)) 

しかし、VBAにこれを変換する方法がわからないし。以下は私にエラーを与える：

x = Worksheetfunction.Average(Worksheetfunction.Index(ArrayX,20,1):Worksheetfunction.Index(ArrayX,50,3)) 

私はちょうど関数間で":"を使用することはできませんと仮定しています。どのように私はそれを回避することができますか？助けを感謝します！

Answer 1

あなたは、行番号と列番号の配列を渡すことによって、あなたの配列のサブセットを抽出するためにApplication.Indexを使用することができます。

x = WorksheetFunction.Average(Application.Index(ArrayX, [row(20:32)], Array(1, 2, 3))) 

注意をWorksheetFunction.Indexはこのために動作しないことに、あなたはApplication.Indexを使用する必要があります。また、配列には65536行の制限があります。