在Excel VBA中可以用cells(1,1).resize(10,20)读取数据吗?

发布网友 发布时间：2022-04-24 00:57

我来回答

共4个回答

热心网友 时间：2023-10-16 17:24

视乎楼主的目的, 及要什麼效果
如 a = 101
Cells(1,1).resize(10,20) = a
A1:T10 的所有单元格 都变成 101

如 a=Cells(1,1).resize(10,20), 当然是错, 情况如在单元格打上 =A1:T10 都是出错误值

Cells(1,1).resize(10,20)是A1:T10的地址
如欲 a 设为 A1:T10 的地址, 要加 Set
Set a = Cells(1,1).resize(10,20)

如欲 a 是 A1:T10 的和
a = application.sum(Cells(1,1).resize(10,20))
------------------------------------------
应用 Set a = Cells(1,1).resize(10,20)
无前无后, 我较难判决
最重要是楼主是否明白Set的作用

热心网友 时间：2023-10-16 17:25

可以。给10行20列的单元格区域，可以考虑使用数组。

热心网友 时间：2023-10-16 17:25

办公室女警 回答的不错，真清楚，欣赏中。。。

热心网友 时间：2023-10-16 17:26

我怎么知道!

热心网友 时间：2023-10-16 17:24

视乎楼主的目的, 及要什麼效果
如 a = 101
Cells(1,1).resize(10,20) = a
A1:T10 的所有单元格 都变成 101

如 a=Cells(1,1).resize(10,20), 当然是错, 情况如在单元格打上 =A1:T10 都是出错误值

Cells(1,1).resize(10,20)是A1:T10的地址
如欲 a 设为 A1:T10 的地址, 要加 Set
Set a = Cells(1,1).resize(10,20)

如欲 a 是 A1:T10 的和
a = application.sum(Cells(1,1).resize(10,20))
------------------------------------------
应用 Set a = Cells(1,1).resize(10,20)
无前无后, 我较难判决
最重要是楼主是否明白Set的作用

热心网友 时间：2023-10-16 17:25

可以。给10行20列的单元格区域，可以考虑使用数组。

热心网友 时间：2023-10-16 17:25

办公室女警 回答的不错，真清楚，欣赏中。。。

热心网友 时间：2023-10-16 17:26

我怎么知道!