user_bvssr 发表于 2016-4-12 13:17:50

关于PPT里面VBA的使用问题

我的PPT里面没页有个图片,我想用宏来改图片的大小,改成统一的,不知道怎么弄,录制了一个宏,但是有的时候能用,有的时候不能用。
想要图片高为15CM,图片居中
录完宏代码如下,请高手帮忙:handshake
Sub Macro6()
'
'
ActiveWindow.Selection.SlideRange.Shapes("Picture 8").Select
With ActiveWindow.Selection.ShapeRange
.Fill.Transparency = 0#
.Height = 425.38
.Width = 605.62
End With
With ActiveWindow.Selection.ShapeRange
.IncrementLeft 92.38
.IncrementTop 66.38
End With
ActiveWindow.Selection.ShapeRange.IncrementLeft 0.38
ActiveWindow.Selection.ShapeRange.IncrementLeft 3.5
End Sub

1379270383 发表于 2016-4-12 16:58:35

::L 在线等答案,谢谢了:handshake

user_dlcul 发表于 2016-4-12 17:03:58

高手快来呀,我需要你~~~~
页: [1]
查看完整版本: 关于PPT里面VBA的使用问题