简单动态变量名EXCEL VBA
简单动态变量名EXCEL VBA
提问于 2020-01-20 21:07:28
我需要设置一个在循环中改变的变量名。请看下面的内容：
我需要的结果是：
Vari1 = 1
Vari2 = 2
Vari3 = 3我尝试过的：
for i = 1 to 3
Vari(i) = i ' (Vari & i) also doesnt work
next i有什么想法吗？
谢谢
回答 1
Stack Overflow用户
发布于 2020-01-20 21:16:03
首先以某种方式从代码中返回动态i (如下所示)，然后调整数组的大小：
Sub Test()
Dim Vari() As Long
Dim i As Long, x As Long
'Get value of i somehow
i = 3
ReDim Vari(1 To i)
For x = 1 To i
Vari(x) = x
Next x
End Sub或者直接通过Evaluate填充Variant数据类型数组
Sub Test()
Dim Vari() As Variant
Dim i As Long
'Get value of i somehow
i = 3
Vari = Evaluate("TRANSPOSE(ROW(1:" & i & "))")
End Sub页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/59823965
复制相关文章
相似问题
腾讯云开发者
