首页 > 解决方案 > 将数组值写入 Range

问题描述

将值添加到数组的代码,然后将这些值复制到范围。

Dim r As Integer
Dim c As Integer
Dim myarray(1 To 10, 1 To 5) As Variant

For r = 1 To 10
For c = 1 To 5
myarray(r, c) = 1
Next c
Next r

Range("A1:E10").Value = myarray

那么,如果我只想将最后五行数组数据复制到 Range("A1:E5"),我该怎么做呢?我知道如何通过循环来实现这一点,但我想在不循环的情况下做到这一点。

范围(“A1:E5”)。值 = ???

标签: excelvba

解决方案


推荐阅读