Appelez le sous-programme lorsqu'une diapositive spécifique est chargée ou sur une minuterie

Question

Je travaille avec une présentation PowerPoint 2003 pour un affichage de kiosque, et elle fonctionne à peu près 24h/24 et 7j/7. Une diapositive sur la météo, la date actuelle et les prévisions sur 7 jours.

J'ai déjà écrit les sous-marins qui mettront à jour la météo à partir d'un classeur Excel, et mettre à jour les dates affichées, mais maintenant je dois le mettre à jour manuellement quand je viens. Y at-il un moyen de sous-programme (par exemple UpdateSlide()) appelé lorsque le diaporama atteint cette diapositive en particulier? Il semble qu'il n'y ait pas de moyen officiel de le faire, je suppose pour des raisons de sécurité, mais qu'en est-il d'un événement chronométré, comme il dirait, toutes les six heures?

Answer 1

Utilisez l'événement OnSlideShowPageChange intégré:

Public Sub OnSlideShowPageChange(ByVal Wn As SlideShowWindow) 
    If Wn.View.CurrentShowPosition = 3 Then 
     'Perform Updates for slide #3 
    EndIf 
End Sub 

Edit: Comme kcoppock souligné, vous pouvez mettre ce code dans un module.

Answer 2

L'événement SlideShowNextSlide est ce dont vous avez besoin. Voir How to write PowerPoint slide change to a file? pour un exemple de la façon de l'utiliser.