Bonjour,
J'ai écrit une macro qui exporte les shapes d'une présentation powerpoint une à une en PNG (ou GIF).
Mon problème est que je n'arrive pas à exporter la transparence. Powerpoint exporte le fond blanc de ma diapositive à la place des zones transparentes.
J'utilise le code suivant:
J'ai par ailleurs réussi à la main à exporter mes shapes avec la transparence en faisant un clique droit sur la forme et "enregistrer en tant qu'image".
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 ActiveWindow.Selection.SlideRange.Shapes(1).Select ActivePresentation.Export path & "\icoppt\" & filename & "." & graphic_type, graphic_type, scalewidth, scaleheight
J'ai donc ensuite enregistré une macro en faisant cette manip, mais quand je lance la macro ceci ne produit pas le même effet. C'est le slide entier qui est sauvegardé et sans transparence!!!
Extrait de la macro:
Ma question est : Comment puis-je exporter mes shapes en images avec la transparence (GIF et si possible PNG).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 ActiveWindow.Selection.SlideRange.Shapes("AutoShape 4").Select ActivePresentation.SaveAs FileName:="Image3.png", FileFormat:=ppSaveAsPNG, EmbedTrueTypeFonts:=msoFalse
Merci d'avance pour vos réponses.
Partager