VBA把Excel区域内容读入数组,把数组的内容写入Excel中_绿水青山

个人资料

微博

正文字体大小：大中小

VBA把Excel区域内容读入数组,把数组的内容写入Excel中

(2022-08-11 18:11:50)

1 .把Excel某一区域的内容读入到数组中:

Dim strArray() As Variant

Dim wk_data As Variant

Set wk_data = Sheets("Sheet1")

strArray = wk_data.Range("A1:CV100").Value

2 .把数组的内容写入到Excel中:

wk_data.Range("A1").Resize(UBound(strArray, 1), UBound(strArray, 2)).Value = strArray

阅读┊ 收藏 ┊ 喜欢 ▼ ┊打印┊举报/Report