Всем привет.
Столкнулся с необходимостью узнать источник запуска макроса. Понимаю, что нужно делать через Application.Caller, но что-то у меня ошибка вылезает.
Можете подсказать, где собака зарыта?
Столкнулся с необходимостью узнать источник запуска макроса. Понимаю, что нужно делать через Application.Caller, но что-то у меня ошибка вылезает.
Код |
---|
Sub NextIfNoAction() Dim Wbn As String Wbn = Application.Caller.Worksheet.Parent.Name If Wbn = "Update" Then Call UserForm2.CommandButton1_Click Else End If End Sub |