共用方式為


Word) (Document.Envelope 屬性

會傳回 Envelope 物件代表信封和文件中的信封功能。 唯讀。

語法

expressionEnvelope

表達 代表 Document 物件的變數。

範例

本範例會將預設信封大小設定為 C4 (229 x 324 mm)。

ActiveDocument.Envelope.DefaultSize = "C4"

如果已經將信封新增至文件中,本範例會顯示收件者地址,否則會顯示訊息方塊。

On Error GoTo errhandler 
addr = ActiveDocument.Envelope.Address.Text 
MsgBox Prompt:=addr, Title:="Delivery Address" 
errhandler: 
If Err = 5852 Then MsgBox "Add an envelope to the document"

本範例會建立新文件並新增已預先定義收件者地址和寄件者地址的信封。

addr = "Don Funk" & vbCr & "123 Skye St." _ 
 & vbCr & "Our Town, WA 98040" 
retaddr = "Karin Gallagher" & vbCr & "123 Main" _ 
 & vbCr & "Other Town, WA 98004" 
Documents.Add.Envelope.Insert Address:=addr, ReturnAddress:=retaddr 
ActiveDocument.ActiveWindow.View.Type = wdPrintView

另請參閱

Document 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應