代码之家 › 专栏 › 技术社区 › Przemyslaw Remin

当VBA宏完成时,数组变量值能否保持不变

variable-declaration vba excel arrays

Przemyslaw Remin · 技术社区 · 5 年前

当宏完成时,数组变量值能否保持不变?我声明了一个全局变量:

Option Explicit
Public Arr2D As Variant

Public Sub ReadDataToArr()
    Arr2D = [MyNamedRange].Value
End Sub

但是一旦宏完成 Arr2D 变得脱离上下文并且 arr2d gets empty.我希望在工作簿打开时读取所有数组变量的数据,并在任何我想要的场合使用它们,而不必每次都声明和填充它们。


   
    
     
      更新
     
     。为什么我认为它是空的?为
     
      arr2d
      
       variable添加手表。
      
     
    
    
     
      
      
     
    
    
     
      
       当我处于上面宏的调试模式时(按F8键),我会看到:
       
        
       
      
     
    
    
     
      
       当我用F8键点击宏的末尾时,我会看到:
       
        
       
      
      
       
        再次更新。
        
         我注意到一些对我来说很奇怪的事情。当我在调试模式下第二次运行上述宏时(初始化值后,变量脱离上下文后),然后在宏的第一行中,变量立即变为“填充”值,并在上下文中。所以也许这就是为什么在评论中产生分歧的原因。

1 回复 | 直到 5 年前

Pá´Ê 5 年前

Option Explicit

Public test As Variant

Sub a()
    test = 5
End Sub

Sub b()
    MsgBox test
End Sub

首次运行

然后运行

它将输出

如预期。

变量< test 会一直坚持到你跑 End 或按 stop vbe中的按钮。

请注意,如果变量 test was initialized,则应在每个过程中进行测试。

例如


   
    Option Explicit

Public Arr2D As Variant

Sub InitArr2D()
    Arr2D = [MyNamedRange].Value
End Sub

Sub ProcedureUsingArr2D()
    If Arr2D Is Nothing Then
        InitArr2D
    End If

    Debug.Print Join(WorksheetFunction.Transpose(Arr2D), ",")
End Sub

    
     如果不测试,变量可能是
     
      Nothing
     
     在发生运行时错误并按下
     
      end
      
       之后。这样它就会自动重新初始化。

推荐文章

Toniq · javascript为php保存多维数组

1 年前

Jannis · Java中数组的怪异行为

1 年前

callum · 如何识别数组中与给定序列不匹配的元素?

1 年前

Gamerboi677 _YT · 如果玩家触摸了某个部分,如何将玩家名称添加到数组中。-Roblox-Lua编码

1 年前

at. · 在一行中创建任意大小的JavaScript/TypeScript 2d数组

1 年前

Rakis Friski · Javascript Spread运算符混淆行为

1 年前

tenfour · 如何使用数组元素的索引初始化数组元素

2 年前

Guillaume · 使用操作从Python列表创建numpy数组

2 年前

maxMas · Swift 5:为什么会出现索引超出范围错误?

2 年前

Sarah Workman · 尝试比较用javascript编程添加的字符串的值

2 年前