Lancer PowerPoint en mode plein écran
Comme Excel, PowerPoint possède un enregistreur de macros (lancé par Outils\Macro\Nouvelle macro) qui peut te permettre de débuter en générant le code correspondant aux actions que tu effectues (ouvrir une présentation, l'afficher en diaporama, etc.).
A partir de ces éléments (qui donnent de bons points de départ sur les objets et méthodes utilisés dans PowerPoint) tu peux écrire un code qui sera exécuté à partir d'Excel. Par exemple, en adaptant le nom de la présentation que tu veux lancer (code à recopier dans un module standard d'un classeur Excel) :
sub LancePresentation()
Dim FichierPpt, pwpt, presppt
FichierPpt = "D:\Cheni2003\mysql\mysql.ppt" 'à adapter
Set pwpt = CreateObject("PowerPoint.Application")
pwpt.Visible = True
Set presppt = pwpt.presentations.Open(Filename:=FichierPpt)
presppt.SlideShowSettings.Run
end subAuteur : Frédéric Sigonneau
Mots clefs associés à cette page : point, ouvrir
- Vous devez vous identifier ou créer un compte pour écrire des commentaires
