=Test2(5)
コードをモジュールに入れた後、Excelに入力します。なぜこれでByref argument type mismatch
エラーが発生するのですか?
最初にTest2
配列を作成するために1行を実行する場合:
Dim X1(5), X2(5) As Double
、それからそれは動作します。しかしb
、関数の引数リストから使用する場合は、 ReDim
(b
定数ではなく変数であるため)使用する必要があり、エラーが発生します。
Function Test1(a As Double)
Test1 = a * 2
End Function
Function Test2(b As Integer)
Dim X1(), X2() As Double
ReDim X1(b), X2(b) As Double
Dim i As Integer
For i = 0 To b
X1(i) = i
X2(i) = Test1(X1(i))
Next i
Test2 = X2(1)
End Function