替换Array.排序在VBA



我们正在将VB .Net中的一段现有代码改编为VBA,并且我们有以下问题:

VBA不识别Array.ResizeArray.SortArray.Reverse等句子。

在VBA中最好的解决方法是什么??我们真的需要这个!

您可以安全地在VBA中使用System.Collections.ArrayList类。

Public Sub DoSomething()
    Dim a As Object
    Set a = CreateObject("System.Collections.ArrayList")
    a.Add 30
    a.Add 20
    a.Add 10
    a.Sort
    For i = 0 To a.Count - 1
        Debug.Print a(i)
    Next
End Sub

得到SortReverse。我不太熟悉这个被弃用的类,看看MSDN是否有适合Resize的东西。

最新更新