TextFrame2.AutoSize プロパティ (Office)

  • [アーティクル]

指定した図形のサイズを、境界ボックス内のテキストに合わせて自動的に変更するかどうかを示す値を取得または設定します。 値の取得と設定が可能です。

構文

式。Autosize

式TextFrame2 オブジェクトを返す式。

注釈

AutoSize プロパティの値は、次の MsoAutoSize クラスの定数のいずれかです。

  • msoAutoSizeMixed
  • msoAutoSizeNone
  • msoAutoSizeShapeToFitText
  • msoAutoSizeTextToFitShape

例

次のコードは、スライド 1 のタイトル テキストのサイズを、テキストを含むレイアウト枠に合うように調整する方法を示しています。

Dim pptSlide As Slide 
 Set pptSlide = ActivePresentation.Slides(1) 
With pptSlide.Shapes(1) 
 If .TextFrame2.TextRange.Characters.Count < 50 Then 
 .TextFrame2.AutoSize = msoAutoSizeTextToFitShape 
 End If 
End With

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。