怎么把二维数组写入带有宏的Excel表指定哪行哪列

如题所述

请看实例:

Sub sr()
Dim arr, h, l   ' h 行号 l 列号
arr = [b1:d2]   ' 令数组 arr = B1:D2
h = 4: l = 3    ' 假设将数组 arr 写入 第4行 第3列
Cells(4, 3).Resize(UBound(arr), UBound(arr, 2)) = arr
End Sub

温馨提示:答案为网友推荐,仅供参考