Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés. Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Se puede hacer devolviendo un tipo Variant. Ejemplo:
Private Sub Form_Load() Dim arreglo As Variant, i As Integer arreglo = devuelveArreglo For i = 0 To UBound(arreglo) MsgBox arreglo(i) Next i End Sub Private Function devuelveArreglo() As Variant devuelveArreglo = Array("a", "b", "c", "d") End Function