数组声明和赋值问题

只是、那个人

为什么会报错呢？声明的数组是[color=rgba(0, 0, 0, 0.85)]变体类型数组
为什么不能赋值

ww87725244

dim 数组()
后续需要redim标示
或者直接dim 数组

醉眼看尘世

我是经验主义者。所以从经验角度出发，建议你在声明时，把()去掉，就OK了

ykcbf1100

把Dim EQ1那一行代码去掉，多此一举

cidanji

后面加 .value 试试

只是、那个人

ykcbf1100 发表于 2024-8-22 12:29
把Dim EQ1那一行代码去掉，多此一举

我确实是这样做的，被动创建数组，但是主动声明是哪没对呢？

ykcbf1100

只是、那个人 发表于 2024-8-22 12:49
我确实是这样做的，被动创建数组，但是主动声明是哪没对呢？

一般情况下不用事先声明，系统会自动判断数组类型。加了定义反而容易出问题。

sunya_0529

只是、那个人 发表于 2024-8-22 12:49
我确实是这样做的，被动创建数组，但是主动声明是哪没对呢？

主动声明变量是个好习惯。

这个问题出现的原因我猜测一下——

“Dim EQ1()”声明的是一个一维数组（长度未知），

而EQ1 = Sheets("1班Eq").Range("A1").CurrentRegion.Value，这里通过CurrentRegion获取的单元格区域的值是一个二维数组。

所以在声明变量时，写成变体型的就好，即：
Dim EQ1
或者：
Dim EQ1 As Variant

yongge9999

根据个人了解的情况，在VBA中：
数组有静态数组和动态数组两种形式。
1、Dim EQ1() 声明的是一个一维数组（长度未知，动态数组），后面还要用Redim 指定维度大小，才能使用。
2、EQ1 = Sheets("1班Eq").Range("A1").CurrentRegion.Value，这种获取的单元格区域的值进行赋值的数组，是静态数组。
静态数组声明时不能加括号。
只能用Dim EQ1 或者 Dim EQ1 As Variant   这种形式声明。
静态数组如果用动态数组声明的形式，系统会报错。

ykcbf1100

sunya_0529 发表于 2024-8-22 13:06
主动声明变量是个好习惯。

这个问题出现的原因我猜测一下——

不声明变量，系统默认就是变体。所以，感觉没必须声明。