Método Document.RunLetterWizard (Word)
Ejecuta el Asistente para cartas en el documento especificado.
Sintaxis
expresión. RunLetterWizard
( _LetterContent_
, _WizardMode_
)
expresión requerida. Variable que representa un objeto Document.
Parameters
Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
---|---|---|---|
LetterContent | Opcional | Variant | Un objeto LetterContent. Las propiedades rellenas del objeto LetterContent se presentan como elementos previamente definidos en los cuadros de diálogo Asistente para cartas. Si se omite este argumento, el método GetLetterContent automáticamente se usa para obtener un objeto LetterContent del documento especificado. |
WizardMode | Opcional | Variant | True para mostrar el cuadro de diálogo Asistente para cartas como una serie de pasos con los botones siguiente, anterior y Finalizar. False para mostrar el cuadro de diálogo Asistente para cartas como si se hubiese abierto desde el menú de Herramientas (cuadro de diálogo Propiedades con un botón Aceptar y un botón Cancelar ). El valor predeterminado es True. |
Comentarios
Utilice el método CreateLetterContent para devolver un objeto LetterContent, dadas algunas propiedades de elementos de cartas. Utilice el método GetLetterContent para devolver un objeto LetterContent en función del contenido del documento especificado. Use el objeto LetterContent resultante con el método RunLetterWizard para preestablecer elementos en el cuadro de diálogo Asistente para cartas .
Ejemplo:
En este ejemplo se crea un objeto LetterContent nuevo, establecen varias propiedades para él y, a continuación, se ejecuta al Asistente para cartas utilizando el método RunLetterWizard.
Set myContent = New LetterContent
With myContent
.Salutation ="Hello"
.SalutationType = wdSalutationOther
.SenderName = Application.UserName
.SenderInitials =Application.UserInitials
End With
Documents.Add.RunLetterWizard _
LetterContent:=myContent, WizardMode:=True
El ejemplo siguiente utiliza el método CreateLetterContent para crear un objeto LetterContent nuevo en el documento activo y, a continuación, se utiliza este objeto con el método RunLetterWizard.
Set myLetter = ActiveDocument _
.CreateLetterContent(DateFormat:="July 31, 1999", _
IncludeHeaderFooter:=False, _
PageDesign:="C:\MSOffice\Templates" _
& "\Letters & Faxes\Contemporary Letter.dot", _
LetterStyle:=wdFullBlock, Letterhead:=True, _
LetterheadLocation:=wdLetterTop, _
LetterheadSize:=InchesToPoints(1.5), _
RecipientName:="Dave Edson", _
RecipientAddress:="436 SE Main St." _
& vbCr & "Bellevue, WA 98004", _
Salutation:="Dear Dave,", _
SalutationType:=wdSalutationInformal, _
RecipientReference:="", MailingInstructions:="", _
AttentionLine:="", Subject:="End of year report", _
CCList:="", ReturnAddress:="", SenderName:="", _
Closing:="Sincerely yours,", SenderCompany:="", _
SenderJobTitle:="", SenderInitials:="", _
EnclosureNumber:=0)
ActiveDocument.RunLetterWizard LetterContent:=myLetter
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.