Shapes.AddTextEffect 方法 (Excel)
建立文字藝術師物件。 傳回 Shape 物件,該物件代表新的文字藝術師物件。
語法
運算式。AddTextEffect (PresetTextEffect、 Text、 FontName、 FontSize、 FontBold、 FontItalic、 Left、 Top)
expression 代表 Shapes 物件的變數。
參數
名稱 | 必要/選用 | 資料類型 | 說明 |
---|---|---|---|
PresetTextEffect | 必要 | MsoPresetTextEffect | 預設的文字效果。 |
Text | 必要 | String | 文字藝術師中的文字 |
FontName | 必要 | String | 文字藝術師中所用的字型名稱 |
FontSize | 必要 | Single | 大小 (以文字藝術師中使用的字型) 為單位 。 |
FontBold | 必要 | MsoTriState | 將文字藝術師中所使用的字型設定為粗體。 |
FontItalic | 必要 | MsoTriState | 將文字藝術師中所使用的字型設定為斜體。 |
Left | 必要 | Single | 文字藝術師之邊界的左上角位置 (以點為單位),與文件左上角相對。 |
Top | 必要 | Single | 文字藝術師之邊界的左上角位置 (以點為單位),與文件頂端相對。 |
傳回值
圖形
註解
當您將文字藝術師新增至檔時,文字藝術師的高度和寬度會根據您指定的文字大小和數量自動設定。
範例
本範例會將包含文字 Test 的文字藝術師新增至 myDocument。
Set myDocument = Worksheets(1)
Set newWordArt = myDocument.Shapes.AddTextEffect( _
PresetTextEffect:=msoTextEffect1, Text:="Test", _
FontName:="Arial Black", FontSize:=36, _
FontBold:=msoFalse, FontItalic:=msoFalse, Left:=10, _
Top:=10)
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。