我正在用程序将表格和图形从Excel复制到PowerPoint。
理想情况下,我希望将图表放在幻灯片的中心,并根据需要调整它们的大小以适合幻灯片。
这不应该太难,我可以检查和修改 .Top , .Left , .Width , .Height 形状很好,但是如何找到滑块的宽度/高度来进行正确的定位?
.Top
.Left
.Width
.Height
下面将给出高度和宽度…
除以2:d
Sub a() Dim a As Presentation Set a = ActivePresentation MsgBox a.PageSetup.SlideHeight, a.PageSetup.SlideWidth End Sub
高温高压