Método Envelope.UpdateDocument (Word)
Actualiza el sobre del documento con la configuración actual del sobre.
Sintaxis
expresión. UpdateDocument
expresión obligatoria. Variable que representa un objeto 'Envelope'.
Comentarios
Si se utiliza esta propiedad antes de agregar un sobre al documento, se produce un error.
Ejemplo:
En este ejemplo se da formato al sobre de Report.doc para que utilice un tamaño de sobre personalizado (4,5 x 7,5 pda).
Sub UpdateEnvelope()
On Error GoTo errhandler
With Documents("Report.doc").Envelope
.DefaultHeight = InchesToPoints(4.5)
.DefaultWidth = InchesToPoints(7.5)
.UpdateDocument
End With
Exit Sub
errhandler:
If Err = 5852 Then _
MsgBox "Report.doc doesn't include an envelope"
End Sub
En este ejemplo se agrega un sobre al documento activo, utilizando las direcciones predefinidas. El contenedor predeterminado de barra código y marca de identificación (FIM-A) configuración está establecida en True y se actualiza el sobre del documento activo.
Dim strAddress As String
Dim strReturn As String
strAddress = "Darlene Rudd" & vbCr & "1234 E. Main St." _
& vbCr & "Our Town, WA 98004"
strReturn = "Patricia Reed" & vbCr & "N. 33rd St." _
& vbCr & "Other Town, WA 98040"
ActiveDocument.Envelope.Insert _
Address:=strAddress, ReturnAddress:=strReturn
With ActiveDocument.Envelope
.DefaultPrintBarCode = True
.DefaultPrintFIMA = True
.UpdateDocument
End With
Consulte también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.
Comentarios
https://aka.ms/ContentUserFeedback.
Próximamente: A lo largo de 2024 iremos eliminando gradualmente GitHub Issues como mecanismo de comentarios sobre el contenido y lo sustituiremos por un nuevo sistema de comentarios. Para más información, vea:Enviar y ver comentarios de