0

私はPowerPoint2010でVBAアプリケーションを作成しています。このアプリケーションは、さまざまな形状を追加し、それらに自動的に名前を付けます。

ここで、-2、0、1の3つの可能な値を持つTextbox.TextFrame.AutoSizeプロパティを変更しようとしています。

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では変更できません。誰かがこの問題を知っていて、それを解決する方法を知っていますか？

ありがとうございました！

4

1 に答える 1

2

OK、ここに行きます：oShであなたの形への参照を仮定します：

With oSh
   .TextFrame2.AutoSize = 2
End With
于 2013-02-28T16:31:55.963 に答える