将单元格装入数组，Ubound却总是提示类型不匹配

pocketmiddle

Dim arr
Set arr＝ Range("E2:F50")
msgbox UBound(arr, 1)    '总是提示 类型不匹配
End sub

请问各位大佬，是什么原因啊？单元格的数组不能求最大最小索引号吗？

一指禅62

是     arr = Range("E2:F50")
不是  set arr = Range("E2:F50")

huang1314wei

把set去掉就好了

我是来讨说法的

去掉set，谢谢

pocketmiddle

huang1314wei 发表于 2018-9-6 11:45
把set去掉就好了

可是，我是想把单元格对象放入数组中啊，而不是单元格的值。因为后续还需要引用数组中的单元格对象。

pocketmiddle

一指禅62 发表于 2018-9-6 11:43
是     arr = Range("E2:F50")
不是  set arr = Range("E2:F50")

可是，我是想把单元格对象放入数组中啊，而不是单元格的值。因为后续还需要引用数组中的单元格对象。

pocketmiddle

我是来讨说法的 发表于 2018-9-6 11:45
去掉set，谢谢

可是，我是想把单元格对象放入数组中啊，而不是单元格的值。因为后续还需要引用数组中的单元格对象。

一指禅62

pocketmiddle 发表于 2018-9-6 11:49
可是，我是想把单元格对象放入数组中啊，而不是单元格的值。因为后续还需要引用数组中的单元格对象。

求最大最小索引号

1. Sub xMax()
   
2.     MsgBox WorksheetFunction.Max(Range("E2:F50"))
   
3. End Sub

复制代码

你那样做的意义何在？

pocketmiddle

一指禅62 发表于 2018-9-6 12:29
求最大最小索引号

谢谢。换种思路也确实解决问题了。但我还是好奇，以单元格为对象的数组，难道不能使用ubound求最大索引号吗？

ming0018

dim arr
arr=array(Range("E2"),Range("E3"))

我就写两个，自己扩展。