Wpis z mikrobloga

@arct2: na przykład:

Function TestXY() As Variant
Dim wynik(1 To 2, 1 To 1) As Double
wynik(1, 1) = 123.3
wynik(2, 1) = 233.3
TestXY = wynik
End Function

Należy wprowadzić w A1:A2 jako formułę tablicową (Ctrl+Shift+Enter).