Word) (Document.Envelope 屬性
會傳回 Envelope 物件代表信封和文件中的信封功能。 唯讀。
語法
expression。 Envelope
表達 代表 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
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。