警惕方括号陷阱

Yalishanda30

大灰狼1976 发表于 2023-8-8 12:12
你再试下这样，a1如果是某个工作表的公共变量，还是取的它的值。
我只是指出这个隐患，并不是说无法迂回 ...

代码在模块是正常的，不在模块这个值就不对了

大灰狼1976

Yalishanda30 发表于 2023-8-8 12:41
代码在模块是正常的，不在模块这个值就不对了

你上一张图的a1变量不属于sheet1，sheet1里面没有这个变量名，sheet1.[a1]当然取到的是A1单元格，如果sheet1里面有a1公共变量呢，你可以再验证一下。

xx20142014

大灰狼1976 发表于 2023-8-8 12:12
你再试下这样，a1如果是某个工作表的公共变量，还是取的它的值。
我只是指出这个隐患，并不是说无法迂回 ...

1. Public A1
   
2. 
   
3. Sub test()
   
4. A1 = 2
   
5. Debug.Print Worksheets(1).[A1]
   
6. End Sub

复制代码

单元格的值非变量

大灰狼1976

xx20142014 发表于 2023-8-8 13:02
单元格的值非变量

是的，我也测试用codename如Sheet1和Sheets(1)两种指定工作表的形式，得出的结果是不同的，Sheets(1).[a1]获得的是单元格的值，而Sheet1.[a1]获得的是a1变量的值（如果有）。
正因为有此问题，我才建议大家慎用，当然变量名不要设置成与单元格地址相同也是需要注意的。

半百

fanyoulin 发表于 2023-8-8 11:52
也有优点，比如：
arr = [{"12","34","56","78","90"}]
可以替代array;

好像
array只能创建一维数组，但能包含变量
[{  }]可以创建二维数组，但不能包含变量

大灰狼1976

半百 发表于 2023-8-8 16:24
好像
array只能创建一维数组，但能包含变量
[{  }]可以创建二维数组，但不能包含变量

也可以带变量创建二维数组，但是方括号不行，要换成等价的evaluate()

1. Sub test()
   
2. Dim s1$, s2$
   
3. s1 = "{12,34;"
   
4. s2 = ",78;90,98}"
   
5. arr = Evaluate(s1 & 56 & s2)
   
6. End Sub

复制代码

makelot

好铁，很有帮助！