[VBA-PP] macro pour insérer des images dans PowerPoint
Bonjour,
Je monte un diaporama avec PowerPoint sous Office 2000. J'ai plus de 300 photos à placer dans des diapos successives et je cherche à simplifier le montage avec des macros. Pas de problème pour créer de nouvelles diapos, ni pour dimensionner les photos insérées.
Par contre, pour insérer les photos qui se trouvent dans un dossier, impossible de créer ou d'écrire une macro qui permette de choisir le fichier à ouvrir. Alors que c'est possible sous Excel.
par exemple, cette macro :
Code:
1 2 3
| Sub Macro1()
Application.Workbooks.Open Application.GetOpenFilename()
End Sub |
fonctionne parfaitement sous Excel.
Recopiée dans une macro sous PowerPoint, elle plante sur .GetOpenFilename et renvoie le message d'erreur suivant :
Citation:
Erreur de compilation : membre de méthode ou de données introuvable
J'ai essayé plusieurs procédures trouvées sur les forums ou des tutoriels, aucune ne fonctionne sous PowerPoint pour choisir le fichier à insérer (correspondant au menu "Insertion - Image - A partir du fichier" de PowerPoint.
Quelqu'un pourrait-il me donner une explication, ou une solution ?
Un grand Merci d'avance
A+