Dim ResultTable(UBound(ProcessData1)) As定义了一个数组,ResultTable,数组的大小和ProcessData1一样,UBound是取数组下标最大值
请楼主补充,贴全代码。