Я пытаюсь иметь счетчик на всех слайдах презентации PowerPoint. Счетчик должен управляться кнопкой во всех слайдах, которая увеличивает его.
Я могу сделать это для одного конкретного слайда, но когда я делаю это с мастером слайдов, он не обновляет экран в режиме слайд-шоу. Я должен выйти из слайд-шоу и войти снова, чтобы увидеть изменения.
Код, который не обновляется в режиме слайд-шоу:
ctr = ctr + 1
ActivePresentation.Designs(1).SlideMaster.Shapes("Counter").TextFrame2.TextRange.Text = ctr
Код, который работает (но применяется только к одному слайду, а не ко всем слайдам в презентации):
ctr = ctr + 1
ActivePresentation.Slides(1).Shapes("Counter").TextFrame2.TextRange.Text = ctr
Спасибо!