运行macros菜单中没有显示macros

我开始学习VBA，我不明白为什么从互联网复制粘贴的一些macros没有出现在运行macros菜单（Alt-F8）中。

下面有2个macros，但只有第二个显示。 为什么？ 我该如何解决？

Sub Test1(ByVal Target As Hyperlink) '... End Sub Sub Test2() '... End Sub 

Answer 1

具有参数的macros在macros列表中不可用，因为它们不能单独运行，而是由另一个macros通过传递必需的参数来调用它们。

Answer 2

如果一个Sub声明包含参数，它将不会在那里显示。

Answer 3

您不能像所描述的那样调用具有参数的macros。 如果你需要有一个参数，你可以把它拿出来，然后让用户input值。

 Sub Test1() Dim hyperLink As String hyperLink = InputBox("Please input hyperlink", "My Parameter") '... End Sub 

或者，如果超文本链接位于文档中，请从文档中获取值。

Answer 4

这里是我的5美分 – 如果你给一个可选的参数 ，你将能够调用子例程，即使它不会显示在你可以select的。

写aaaaTestMe并按下运行 。

 Public Sub aaaaTestMe(Optional lngA As Long = 8) Debug.Print lngA End Sub