是否可以在VBA函数中返回一个数组？

Question

我希望这不是重复（我全神贯注地找不到答案 - 我可能错过了一些明显的答案）。

如果可能，它是如何完成的？我不想输出到任何细胞。

Answer 1

是。只需将括号放在函数中的返回类型之后。

这是一个简单的示例函数和使用它的子函数：

 Sub test3()
      Dim myarray() As String
      myarray = returnarray()
      MsgBox myarray(2)
 End Sub

 Function returnarray() As String()

      returnarray = Split("test1, test2, test3", ",")

 End Function