Bonjour !
Je débute en programmation VBA et je voudrais insérer une image au slide actif. J'arrive à l'insérer au 1er slide mais je bugue sur l'insertion au slide actif. Voici ce que j'ai actuellement :
Sub Inversion()
Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes.AddPicture "d:\Deutsch\Grammatik\inversionverbe.jpg", LinkToFile:=msoTrue, SaveWithDocument:=msoTrue, _
Left:=100, Top:=100, Width:=70, Height:=70
End Sub
Merci beaucoup de votre aide !
Partager