在VBA中替换Array.Sort

Question

我们正在调整VB .Net的现有代码到VBA，我们有以下问题：

VBA无法识别Array.Resize，Array.Sort和Array.Reverse等句子。

VBA中最好的解决方法是什么？我们真的需要这个！

Answer 1

您可以安全地在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

这会为您提供Sort和Reverse。我对这个已弃用的课程并不熟悉，看看MSDN是否有适合Resize费用的内容。