Newsletter Developpez.com

Inscrivez-vous gratuitement au Club pour recevoir
la newsletter hebdomadaire des développeurs et IT pro

FAQ PowerPointConsultez toutes les FAQ

Nombre d'auteurs : 20, nombre de questions : 150, dernière mise à jour : 30 mars 2017 

 
OuvrirSommaireMacros, VBA et fonctions avancéesMacros, VBA et fonctions avancées Images
vba
Sélectionnez

Presentation("MaPres").Slides(1).Export "c:\madiapo", "JPG"
Créé le 9 novembre 2007  par bidou
vba
Sélectionnez

Private Sub CommandButton1_Click()
Dim NomImage As String
 
NomImage = "C:\imageTemp.jpg"
 
'Supprime l'image si elle existe déja
If Dir(NomImage) <> "" Then Kill NomImage
 
'Exporte le 1er Slide au format image
ActivePresentation.Slides(1).Export NomImage, "jpg"
End Sub
Créé le 4 octobre 2007  par SilkyRoad
  

Les sources présentées sur cette page sont libres de droits et vous pouvez les utiliser à votre convenance. Par contre, la page de présentation constitue une œuvre intellectuelle protégée par les droits d'auteur. Copyright © 2009 Developpez Developpez LLC. Tous droits réservés Developpez LLC. Aucune reproduction, même partielle, ne peut être faite de ce site et de l'ensemble de son contenu : textes, documents et images sans l'autorisation expresse de Developpez LLC. Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 € de dommages et intérêts.