共用方式為


TextFrame2.AutoSize property (Office)

會傳回或設定值,指出指定之圖案的大小是否會自動變更,以便在圖案的邊界內容納文字。 讀取/寫入。

語法

表情自動尺寸

一個回傳 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 支援與意見反應