使用VBA在PowerPoint中设置对象的位置

Question

我使用以下VBA行来设置我刚刚粘贴到PowerPoint中的Excel选择的大小/位置:

Set Shp = _
PPApp.ActivePresentation.Slides( _
PPApp.ActiveWindow.Selection.SlideRange.slideindex).Shapes(3)
Shp.ScaleHeight 0.75, msoCTrue
Shp.ScaleWidth 0.75, msoCTrue
Shp.Left = 0.58
Shp.Top = 1.6

然而,在宏运行之后,我的形状从左上角开始有0.01英寸的水平位置,从左上角开始有一个"0.02"的垂直位置.基于我的代码,位置应该是0.58和1.6.为什么这个职位没有正确设定？

Answer 1

为了补充Tim的说法,PowerPoint使用点作为其测量系统,至少为了自动化的目的,所以这样做:

Shp.Left = 0.58 * 72
Shp.Top = 1.6 * 72