Суть моей проблемы в следующем: решаю некую задачу на VBA. Потребовалась необходимость при смене слайда или начале/окончании презентации выстреливать данные в Com-порт. Это все решается при помощи компонента MSComm32. Но затык возник в следующем: не могу отловить событие смены слайда! 
Задачу эту решал так: 
Создал модуль класса, в нем указал 
Public WithEvents App As Application 

В другом модуле соответственно сделал следующее 
Dim X As New EventClassModule 

Sub InitializeApp() 
Set X.App = Application 
End Sub 

Если как макрос привязываю запуск InitializeApp к первому слайду или просто запускаю его перед началом презентации, то все ок.
Проблема в следующем. Я должен управлять презентацией со своей формы, сделанной в VBA. Там запуск презентации осуществляется по щелчку мыши. Так вот если я ставлю InitializeApp в обработку щелчка по кнопке, запускающей презентацию, то обработки событий (например смены слайда) - нет. Почему может быть такое?