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

我正在使用下面几行VBA来设置我刚刚粘贴到PowerPoint中的Excelselect的大小/位置：

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 

但是macros运行后，我的形状左上angular的水平位置是0.01“，左上angular的水平位置是”0.02“，根据我的代码，位置应该是0.58和1.6。为什么这个职位没有正确设置？

Answer 1

为了增加Tim的说法，PowerPoint至less在自动化方面使用点作为它的度量系统，所以请改为：

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