web-dev-qa-db-ja.com

VBAの関数から配列を返す

すべて、

整数の配列を返す関数を作成してインデックスを作成できるようにしますが、VBAの構文を認識していません。擬似コードは次のとおりです。

function getStats() as integer
    dim returnVal(4) as integer
    returnVal(0)=c2percent14
    returnVal(1)=c3percent14
    returnVal(2)=c4percent14
    returnVal(3)=c5percent14
    getStats=returnVal
end function

msgbox getStats(3)

ここで、これらの値はすべて整数であるか、そうである必要があり、必要な統計の戻り配列にインデックスを付けることができます。ありがとう。

-リック

vbafunctionreturn-value
12
Rik
Function getStats() As Variant

getStatsは整数ではなく配列になりました

8
Tim

関数に型を配列として指定します。

function getStats() as integer()    
    dim returnVal(4) as integer

    returnVal(0) = c2percent14
    returnVal(1) = c3percent14
    returnVal(2) = c4percent14
    returnVal(3) = c5percent14

    getStats = returnVal

end function

Sub mysub()

   Dim myArray(4) As String

   myArray = getStats()

   msgbox myArray(3)

end sub
26
moffeltje