VBA调用方法基于字符串值

Question

如果我声明了一个字符串数组，并且每个字符串都是一个Sub名称，那么如何在不需要if语句的情况下调用该名称的Sub？

伪代码示例：

Set String Array = {"sub1","sub2","sub3"}
for each String str in Array
    call str 'where str is a Sub
next str

我知道如何创建一个数组并调用Subs;我只是不知道如何使用字符串值调用Sub。

Answer 1

试试这个：

Application.Run (str)

我通过做类似的事情来了解这一点。您还可以通过执行以下操作将变量传递给该子：

Application.Run (str, "YourValue")