我正在 PowerPoint2010 中编写一个 VBA 应用程序,它添加不同的形状并自动命名它们。
现在我正在尝试更改具有三个可能值的 Textbox.TextFrame.AutoSize 属性:-2、0 和 1。
如果我尝试将 ppAutoSizeMixed 与 VBA 一起分配,则会出现“超出范围”异常。0 和 1 我可以毫无困难地分配。
Debug.Print ActiveWindow.Selection.SlideRange.Shapes(1).TextFrame.AutoSize //-2
ActiveWindow.Selection.SlideRange.Shapes(1).TextFrame.AutoSize = ppAutoSizeNone //0
ActiveWindow.Selection.SlideRange.Shapes(1).TextFrame.AutoSize
= ppAutoSizeMixed//-2: exception
我可以使用 PowerPoint 更改值,但不能使用 VBA。有人知道这个问题并知道如何解决吗?
谢谢!