如何从多维VBA数组中提取有用的值？

函数以j，0i，0的形式返回一个四维数组。要将其转换为形式为j，i的二维数组。如何将值I移动到绑定在j旁边的插槽中，然后重新对数组进行尺寸标注，以删除备用的两个尺寸？

将问题分为两部分：

一,。如何将值I移动到绑定到j旁边的插槽

创建一个新的二维数组。循环遍历两个数组，并根据需要将值从旧的四维数组分配给新的二维数组。然后擦除旧的四维数组以释放内存

二,。然后重新对阵列进行尺寸标注，以删除备用的两个尺寸

这是不可能的——或者至少在不删除数组内容的情况下是不可能的。您可以使用ReDim删除平面尺寸标注，但会删除阵列中包含的所有数据，因此无法达到您的目的

---

这就是我在上面的第1部分中让您创建一个新数组的原因

将问题分为两部分：

一,。如何将值I移动到绑定到j旁边的插槽

创建一个新的二维数组。循环遍历两个数组，并根据需要将值从旧的四维数组分配给新的二维数组。然后擦除旧的四维数组以释放内存

二,。然后重新对阵列进行尺寸标注，以删除备用的两个尺寸

这是不可能的——或者至少在不删除数组内容的情况下是不可能的。您可以使用ReDim删除平面尺寸标注，但会删除阵列中包含的所有数据，因此无法达到您的目的

这就是我在上面的第1部分中让您创建一个新数组的原因