bonjour je cherche à créer une macro qui me permettent d'enregistrer dans powerpoint toutes mes présentations en incorporant les polices
 
j'ai fait tourner une macro sur un de mes fichier  
 
ActivePresentation.Save , FileFormat:=ppSaveAsPresentation, EmbedTrueTypeFonts:=msoTrue
 
et je voudrai la modifier pour qu'elle s'applique à l'ensemble de mes fichiers ouverts dans l'application
 
je pensais y arriver en faisant un
for each P in presentations
P.Save , FileFormat:=ppSaveAsPresentation, EmbedTrueTypeFonts:=msoTrue
next
 
mais ça marche pas
 
a l'aide