VBA将一个数组添加到另一个数组

我是VBA的超级新手（并且是堆栈溢出的内容，这是我的第一篇文章），我正在尝试简化代码，但似乎无法找到在1行中将1D数组添加到3D数组的方法。 我有3维数组

Dim myArray(50, 20, 3) As Variant

目前，我必须这样做：

myArray(0, 0, 0) = 0: myArray(0, 0, 1) = 1: myArray(0, 0, 2) = 2

您可以看到我实际上在1行中有3条语句，而且我不得不键入3次数组名称。 我想做的是这样的：

myArray(0, 0) = {0,1,2}

最终结果应该相同。