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

Objeto Document

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.