會傳回或設定值,指出指定之圖案的大小是否會自動變更,以便在圖案的邊界內容納文字。 讀取/寫入。
語法
表情。自動尺寸
詞 一個回傳 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 支援與意見反應。