s********y
发帖数: 979 | 1 想用VBA在PPT中插入一张图片，这个图片总是在PPT同一个目录下面，所以看网上说不
需要指定路径，但是老是出错。把MACRO写好直接运行没有问题，把PPTM关了再打开就
找不到文件，这是什么问题？
Sub test()
Dim objPresentaion As Presentation
Dim objSlide As Slide
Dim objImageBox As Shape
Set objPresentaion = ActivePresentation
Set objSlide = objPresentaion.Slides.Item(3)
Set objImageBox = objSlide.Shapes.AddPicture("apples.png", LinkToFile:=
msoTrue, SaveWithDocument:=msoTrue, Left:=90, Top:=130, Width:=250, Height:=
300)
End Sub |
|
