В одной из тем увидел такую конструкцию, рекомендованную уважаемым KukLP
Option Explicit
Private WithEvents App As Application
Private Sub Workbook_Open()
Set App = Application
End Sub
Private Sub App_WorkbookBeforeSave(ByVal Wb As Workbook, ByVal SaveAsUI As Boolean, Cancel As Boolean)
....
End Sub
Как я понимаю, смысл объявления переменной App состоит в возможности потом написать Sub App_WorkbookBeforeSave.
А чем это отличается от того, чтобы написать
Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel as Boolean)?
Видимо я чего-то не понимаю... :(
Option Explicit
Private WithEvents App As Application
Private Sub Workbook_Open()
Set App = Application
End Sub
Private Sub App_WorkbookBeforeSave(ByVal Wb As Workbook, ByVal SaveAsUI As Boolean, Cancel As Boolean)
....
End Sub
Как я понимаю, смысл объявления переменной App состоит в возможности потом написать Sub App_WorkbookBeforeSave.
А чем это отличается от того, чтобы написать
Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel as Boolean)?
Видимо я чего-то не понимаю... :(