Template.OpenAsDocument 方法 (Word)
會開啟指定的範本成為文件並傳回 Document 物件。
語法
expression. OpenAsDocument
需要 expression。 代表 'Template' 物件的變數。
傳回值
文件
註解
開啟為文件的範本可讓使用者編輯的範本內容。 這可能需要如果屬性或方法 (例如 樣式 ] 屬性) 不是可從 Template 物件。
範例
這則範例會開啟附加至使用中文件的範本、顯示一則訊息方塊 (如果範本包含單一段落標記以外的項目),然後關閉範本。
Dim docNew As Document
Set docNew = ActiveDocument.AttachedTemplate.OpenAsDocument
If docNew.Content.Text <> Chr(13) Then
MsgBox "Template is not empty"
Else
MsgBox "Template is empty"
End If
docNew.Close SaveChanges:=wdDoNotSaveChanges
這則範例會將 Normal 範本的複本儲存成 "Backup.dot"。
Dim docNew As Document
Set docNew = NormalTemplate.OpenAsDocument
With docNew
.SaveAs FileName:="Backup.dot"
.Close SaveChanges:=wdDoNotSaveChanges
End With
此範例會在附加至使用中文件之範本的標題 1] 樣式的格式設定。 UpdateStyles 方法會更新使用中文件的樣式。
Dim docNew As Document
Set docNew = ActiveDocument.AttachedTemplate.OpenAsDocument
With docNew.Styles(wdStyleHeading1).Font
.Name = "Arial"
.Size = 16
.Bold = False
End With
docNew.Close SaveChanges:=wdSaveChanges
ActiveDocument.UpdateStyles
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。