Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 26.05.2017, 16:55   #1
Golden_RUS
Пользователь
 
Регистрация: 23.01.2013
Сообщений: 34
По умолчанию VBA для powerpoint. Событие смена слайда.

Ветки для VBA for PP нет, по этому пишу тут. Нужно дергать консольное приложение через функцию shell при смене слайда (или при открытии слайда), передавая номер слайда как параметр.
Golden_RUS вне форума Ответить с цитированием
Старый 27.05.2017, 17:31   #2
Golden_RUS
Пользователь
 
Регистрация: 23.01.2013
Сообщений: 34
По умолчанию

Решил проблему костылями. Мб кому пригодится.
Код:
Dim lp As Boolean, last As Integer, now As Integer
Private Sub Start_Button_Click()
 On Error Resume Next
 last = 0
 lp = True
    While lp
        DoEvents
            now = ActivePresentation.SlideShowWindow.View.Slide.SlideIndex
            If now <> last Then
                last = now
                'Вызов shell тут
                
            End If
            If last = 6 Then
                lp = False
            End If
    Wend
End Sub
ps Код вешается на нажатие на кнопку на 1 слайде.

Последний раз редактировалось Golden_RUS; 27.05.2017 в 17:32. Причина: ps
Golden_RUS вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Можно ли создать событие для формы VBA? segail Microsoft Office Excel 20 25.01.2016 12:15
Excel / PowerPoint / VBA - данные сводной таблицы Hoochara Microsoft Office Excel 2 10.07.2013 13:19
PowerPoint VBA как в демонстрации добавить ктопку ПЕЧАТЬ РЕЗУЛЬТАТА Виталий М Microsoft Office Excel 2 13.02.2013 12:46
помогите пожалуйста PowerPoint и VBA CATerpillar Microsoft Office Excel 42 09.04.2009 14:30