Попытка создать подпрограмму, но получить ошибку макроса в VBA

Question

Я пытаюсь написать подпрограмму в VBA, которая выглядит следующим образом:

 Public Sub Value(X As Double)

 Code in here...

 End Sub

Однако всякий раз, когда я пытаюсь запустить это, он не распознает подпрограмму, которую я только что написал.Почему это так?

Я могу заставить работать сабвуфер, если напишу его так:

 Public Sub Value()

 Dim X As Double

 Code in here...

 End Sub

Однако мне нужно сделать это первым способом.Есть ли что-то, чего мне не хватает, что мне нужно включить в мой код, чтобы иметь возможность написать это первым способом?

Answer 1

См. Этот пример:

Public Sub Value(X As Double)

MsgBox X + 1

End Sub
Public Sub Test()

Value 2.2

End Sub

Запуск Test даст вам: