Function ArrToRange(arr, rng As Range)
'二维数组输出到单元格区域 rng为左上角
rng.Resize(UBound(arr) - LBound(arr) + 1, UBound(arr, 2) - LBound(arr, 2) + 1) = arr
End Function
03-26
7040
06-23
4071
07-16
2023
“相关推荐”对你有帮助么?
-
非常没帮助
-
没帮助
-
一般
-
有帮助
-
非常有帮助
提交