53页的给对象变量赋值的那一段代码——“Range“是什么数据类型？

investor2006

hehex 发表于 2013-1-31 01:37
vba 里面关于变量的定义分为基础类型和对象类型的变量（还有一个变体型，我们暂时不讨论）。
变量的操作 ...

楼主看书很仔细，我很欣赏，因为我也是这样的人，我看到这一点也很困惑。
hehex回答的非常清楚，我彻底明白了。
多谢两位！

vpn115

谢谢hehex的完美解答！
我也是看到这个问题。因为range不是p43里的任何一种类型，起码之前没说明。
也就是说这本书的知识预备性不好，或许也是因为如此，才能跨过一些障碍快速推进学习。

slg36

和楼主有一样的困惑，看了回答清楚了

slg36

学习了，搞清楚了

18351966122

看别人程序偶然发现这条定义，一脸懵逼。谢谢hehex的解释，豁然开朗。基础类型变量和对象类型的变量，很完美！

qinming1

感谢5楼老师的回答

hanjianbin

hehex 发表于 2013-1-31 01:37
vba 里面关于变量的定义分为基础类型和对象类型的变量（还有一个变体型，我们暂时不讨论）。
变量的操作 ...

一段代码如下：
r = Range("a" & Rows.Count).End(xlUp).Row
arr = Range("a2:c" & r)
i=1
k=0
Do While arr(i, 1) = arr(i + k, 1)
        MsgBox arr(ii, 1) & "----" & arr(ii + k, 1), vbOKOnly
        k = k + 1
        If ii + k > UBound(arr) Then Exit Do
    Loop


此时arr(i, 1)表示何种类型，arr(i, 1)可用，而arr(i, 1).Select错误（我试了，如果第二句前加Set赋值则正确 ），我知道Range(2,1)是错误的表示方法，则当如何理解？
另，VBA中有声明Range对象（dim arr as Range），则有无声明Cell对象？
请老师赐教。

hanjianbin

hehex 发表于 2013-1-31 01:37
vba 里面关于变量的定义分为基础类型和对象类型的变量（还有一个变体型，我们暂时不讨论）。
变量的操作 ...

一段代码如下：
r = Range("a" & Rows.Count).End(xlUp).Row
arr = Range("a2:c" & r)
i=1
k=0
Do While arr(i, 1) = arr(i + k, 1)
        MsgBox arr(ii, 1) & "----" & arr(ii + k, 1), vbOKOnly
        k = k + 1
        If ii + k > UBound(arr) Then Exit Do
    Loop


此时arr(i, 1)表示何种类型，arr(i, 1)可用，而arr(i, 1).Select错误（我试了，如果第二句前加Set赋值则正确 ），我知道Range(2,1)是错误的表示方法，则当如何理解？
另，VBA中有声明Range对象（dim arr as Range），则有无声明Cell对象？
请老师赐教。

6564536

讲的真清楚，我也搞部明白

hehex

hanjianbin 发表于 2019-8-30 00:30
一段代码如下：
r = Range("a" & Rows.Count).End(xlUp).Row
arr = Range("a2:c" & r)

arr = Range("a2:c" & r)

这里，这句话arr 不是Range对象，而是一个从单元格对象引用而来的二维数组。
为什么不是对象？我在前面5楼讲过了，给一个对象赋值是要用Set xxx = 某对象实体 这种方式的。

数组是用下标来标识位置的，这里arr 的第一维，就是第一个数可以认为是一张表的行，第二个数可以认为是列，而内容就是单元格的值。里面不是对象当然就不支持select 之类的方法。

Cells是另外一种表示Range对象的形式 是支持Cells(行，列）这样表示一个单元格的，Cells 表示的是单元格对象，这点和上面的arr完全不同。