2008-09-23 7 views

Répondre

7

1. Ajoutez une référence au modèle d'objet PowerPoint à votre application VBA

Dans la fenêtre VBA, choisissez Outils | Références
Rechercher Microsoft Powerpoint 12.0 Object Library et vérifiez

2. Sélectionner et activer l'objet de présentation PowerPoint

ActiveSheet.Shapes("Object 1").Select 
Selection.Verb Verb:=xlOpen 

Note: ce code suppose que l'objet PowerPoint est nommé Objet 1 (regardez dans le coin supérieur gauche pour voir de quoi il s'agit vraiment) et que c'est sur la feuille active.

3. Obtenir une référence à l'objet Présentation

Dim p As PowerPoint.Presentation 
Set p = Selection.Object 

4. le manipulons

Toutes les méthodes et les propriétés d'un objet de présentation sont à votre disposition. Voici un exemple d'ajouter une diapositive:

p.Slides.Add 1, ppLayoutBlank 

5. Désélectionnez il

La façon la plus simple est juste pour sélectionner une cellule.

[a1].Select 

Hope that helps!

+0

Fantastique, merci. – user4812

Questions connexes