Office) (TextFrame2.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 支援與意見反應。