Обновление Linked Excel Slide в Powerpoint Слайд-шоу

Question

У меня есть презентация Powerpoint, которая должна непрерывно контура, чтобы постоянно отображать информацию. Я хочу, чтобы связанный объект Excel Worksheet в одном слайде обновлял свои данные каждый раз, когда отображается слайд, показывая обновленные данные в представлении цикла.

Как бы я это сделал?

Answer 1

код, чтобы сделать обновление только одна строка:

ActivePresentation.Slides(2).Shapes(1).LinkFormat.Update 

Вы можете обратиться как к Slides и Shapes номер индекса или по имени. В приведенном выше примере обновляется ссылка на первый объект Shape на 2-й объект Slide. Вам нужно выполнить следующие шаги, чтобы сделать этот код в нужное время.

Из документации Microsoft Office:

Как: Использование событий с объектом Application

Чтобы создать обработчик события для события объекта Application, вы необходимо заполнить следующие три этапа:

1. Объявление переменной объекта в модуле класса для ответа на события.
2. Напишите конкретные процедуры обработки событий.
3. Инициализировать объявленный объект из другого модуля.

Объявляет объект переменной

Прежде чем писать процедуры для событий объекта Application , вы должны создать новый модуль класса и объявить объект типа Application с событиями. Например, предположим, что создан новый класс и называется EventClassModule. Новый класс класса содержит следующий код.

VBA

Public WithEvents App As Application 

Написать процедуры событий

После того, как новый объект объявлен с событиями, он появляется в списке Object в модуле класса, и вы можете написать событие процедуры для нового объекта . (Когда вы выбираете новый объект в списке объектов, в списке «Процедуры» перечислены действительные события .) Выберите событие из списка «Порядок»; пустая процедура добавляется к модулю класса .

VBA

Private Sub App_SlideShowNextSlide(ByVal Wn As SlideShowWindow) 
    ActivePresentation.Slides(2).Shapes(1).LinkFormat.Update 
End Sub 

Инициализация Заявленный объект

Перед процедурой будет работать, вы должны подключить заявленную объект в модуль класса (App в данном примере) с Заявкой объект. Вы можете сделать это со следующим кодом из любого модуля.

VBA

Dim X As New EventClassModule 
Sub InitializeApp() 
    Set X.App = Application 
End Sub 

Выполните процедуру InitializeApp. После выполнения процедуры объект App в модуле класса указывает на объект приложения Microsoft Office PowerPoint , а процедуры событий в модуле класса будут выполняться при возникновении событий .