將新的 TextStyle 物件新增至指定的 TextStyles 集合，並傳回新的 TextStyle 物件。
語法
運算式。新增 (StyleName、 Font、 ParagraphFormat、 BasedOn)
運算式 代表 TextStyles 物件的變數。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| StyleName | 必要 | String | 新文字樣式的名稱。 若名稱符合現存的文字樣式，則會覆寫現存的文字樣式。 |
| Font | 選用 | Font | 套用至新文字樣式的字型設定。 |
| ParagraphFormat | 選用 | ParagraphFormat | 套用至新文字樣式的段落格式。 |
| BasedOn | 選用 | String | 新文字樣式所依據之文字樣式的名稱。 若名稱與現存的文字樣式不符，則會發生錯誤。 |
傳回值
TextStyle
範例
下列範例根據 [一般] 文字樣式，將新的文字樣式新增至使用中出版物。
Dim tsNew As TextStyle
Set tsNew = ActiveDocument.TextStyles _
.Add(StyleName:="Title", BasedOn:="Normal")
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。