以下是将一个或多个数组合并成一个新数组的 VBA 代码示例：
这个 VBA 函数使用了可变参数（ParamArray），可以接受任意数量的数组作为输入。函数通过遍历每个数组来计算结果数组的长度，然后使用一个偏移量变量来跟踪每个数组在结果数组中的起始位置。最后，函数将所有输入数组中的元素复制到结果数组中，然后返回结果数组。使用此函数时，可以按以下方式调用它：
在此示例中，我们将三个数组作为输入传递给 MergeArrays 函数，并将结果存储在 result 数组中。最后，我们使用 Join 函数将 result 数组中的元素连接成一个字符串，并将其输出到调试窗口。