各位大神请问,如何用EXcel vba将ppt 中的图开设置成于幻灯片尺寸相同大小
发布网友
发布时间:2022-05-17 17:46
我来回答
共1个回答
热心网友
时间:2023-11-01 00:06
Sub 图片设置成幻灯片尺寸相同大小()
Dim ppPres As Presentation
Set ppPres = ActivePresentation
With ppPres.Slides(4).Shapes("Content Placeholder 4")
.LockAspectRatio = msoFalse '取消纵横比锁定
.Left = 0
.Top = 0
.Width = ppPres.PageSetup.SlideWidth
.Height = ppPres.PageSetup.SlideHeight
End With
End Sub
追问朋友你好:你的扣多少我向你请教