Здравствуйте! Уважаемые Форумчане! Прошу помощи! Вопрос в следующем:
Имеется ComAddin вызываю его следующим способом:
У аддона есть несколько методов: Execute1, Execute2, Excecute3
Подскажите пожалуйста возможно ли передавать эти методы, таким же способом как и tRange? чтобы избежать применения If ...Then
И как это реализовать в коде?
Имеется ComAddin вызываю его следующим способом:
| Код |
|---|
Sub Test(tRange As Range)
Dim addin As COMAddIn
Dim automationObject As Object
Set addin = Application.COMAddIns("MyAddin")
Set automationObject = addin.Object
Call automationObject.Execute1(tRange)
|
Подскажите пожалуйста возможно ли передавать эти методы, таким же способом как и tRange? чтобы избежать применения If ...Then
И как это реализовать в коде?
