Вызов сабвуфера в VBA

Question

Это мой упрощенный скрипт:

    Sub SomeOtherSub(Stattyp As String)
        'Daty and the other variables are defined here

        CatSubProduktAreakum(Stattyp, Daty + UBound(SubCategories) + 2)

    End Sub

    Sub CatSubProduktAreakum(Stattyp As String, starty As Integer)

    'some stuff

    End Sub

Вызов CatSubProduktAreakum помечен красным как «ошибка синтаксиса».Я не понимаю ошибку.Это простой вызов подпрограммы с двумя аргументами.Почему VBA не принимает вызов?

Answer 1

Попробуйте -

Call CatSubProduktAreakum(Stattyp, Daty + UBound(SubCategories) + 2)

Что касается причины, это из MSDN через этот вопрос - Что ключевое слово Call делает в VB6?

Вы не обязаны использовать ключевое слово Call при вызове процедуры. Однако, если вы используете ключевое слово Call для вызова процедуры, которая требует аргументы, список аргументов должен быть заключен в скобки. Если вы опустите ключевое слово Call, вы также должны опустить круглые скобки вокруг СписокАргументов. Если вы используете либо Синтаксис вызова для вызова любого внутреннего или пользовательская функция, возвращаемое значение функции отбрасывается.

Answer 2

Для тех, кто все еще посещает этот пост, другой вариант - просто опустить круглые скобки:

Sub SomeOtherSub(Stattyp As String)
    'Daty and the other variables are defined here

    CatSubProduktAreakum Stattyp, Daty + UBound(SubCategories) + 2

End Sub

Ключевые слова Call действительно только в VBA для обратной совместимости и фактически не требуются.

Если, однако, вы решите использовать ключевое слово Call, вам придется изменить свой синтаксис на подходящий.

'// With Call
Call Foo(Bar)

'// Without Call
Foo Bar

Оба будут работать одинакововещь.

---

Тем не менее, могут быть случаи, когда нужно следить за тем, где использование скобок излишне приведет к тому, что вещи будут оцениваться там, где вы этого не предполагали (как это делается в VBA в скобках)поэтому, учитывая это, лучшим вариантом, вероятно, является опускание ключевого слова Call и скобок