Automatización de Microsoft Word para realizar la combinación de correspondencia desde Visual C #

  • Artículo
  • Se aplica a:
    Microsoft Word

Para obtener una versión de Microsoft Visual Basic .NET de este artículo, consulte 301656.

Resumen

En este artículo se muestra cómo automatizar Microsoft Word para crear un documento combinado por correo mediante Microsoft Visual C# 2005 o Microsoft Visual C# .NET.

Más información

La automatización es un proceso que permite a las aplicaciones escritas en lenguajes como Visual C# 2005 o Visual C# .NET controlar mediante programación otras aplicaciones. La automatización de Word le permite realizar acciones como crear nuevos documentos, agregar texto a documentos y dar formato a los documentos. Con Word y otras aplicaciones de Microsoft Office, prácticamente todas las acciones que se pueden realizar manualmente a través de la interfaz de usuario también se pueden realizar mediante programación mediante Automation.

Word expone esta funcionalidad mediante programación a través de un modelo de objetos. El modelo de objetos es una colección de clases y métodos que sirven como homólogos de los componentes lógicos de Word. Por ejemplo, hay un objeto Application, un objeto Document y un objeto Paragraph, cada uno de los cuales contiene la funcionalidad de esos componentes en Word. Para tener acceso al modelo de objetos desde Visual C# 2005 o Visual C# .NET, puede establecer una referencia de proyecto a la biblioteca de tipos.

En este artículo se muestra cómo establecer la referencia de proyecto adecuada a la biblioteca de tipos de Word para Visual C# .NET y se proporciona código de ejemplo para automatizar Word.

Creación del ejemplo de Automation

  1. Inicie Microsoft Visual Studio 2005 o Microsoft Visual Studio .NET.

  2. En el menú Archivo, haga clic en Nuevo y, a continuación, haga clic en Proyecto. Seleccione Aplicación windows en Los tipos de proyecto de Visual C#. Form1 se crea de forma predeterminada.

  3. Agregue una referencia a la biblioteca de objetos de Microsoft Word 11.0 en Visual Studio 2005 o a la biblioteca de objetos de Microsoft Word en Visual Studio .NET. Para ello, siga estos pasos:

    1. On the Project menu, click Add Reference.

    2. En la pestaña COM, busque Biblioteca de objetos de Microsoft Word y haga clic en Seleccionar.

      En Visual Studio 2005, busque Biblioteca de objetos de Microsoft Word 11.0 en la pestaña COM .

      Nota Microsoft Office 2003 incluye ensamblados de interoperabilidad primarios (PIA). Microsoft Office XP no incluye los PIA, pero se pueden descargar.

    3. Haga clic en Aceptar en el cuadro de diálogo Agregar referencias para aceptar las selecciones.

  4. En el menú Ver, seleccione Cuadro de herramientas para mostrar el cuadro de herramientas y, a continuación, agregue un botón a Form1.

  5. Haga doble clic en Button1. Aparece la ventana de código del formulario.

  6. En la ventana de código, reemplace el código siguiente.

      private void button1_Click(object sender, System.EventArgs e)
  {
  }

    con:

    Word.Application wrdApp;
Word._Document wrdDoc;
Object oMissing = System.Reflection.Missing.Value;
Object oFalse = false;

private void InsertLines(int LineNum)
{
int iCount;

// Insert "LineNum" blank lines.
for(iCount = 1; iCount<=LineNum; iCount++) 
{
wrdApp.Selection.TypeParagraph();
}
}

private void FillRow(Word._Document oDoc, int Row, string Text1,
string Text2, string Text3, string Text4)
{
// Insert the data into the specific cell.
oDoc.Tables[1].Cell(Row,1).Range.InsertAfter(Text1);
oDoc.Tables[1].Cell(Row,2).Range.InsertAfter(Text2);
oDoc.Tables[1].Cell(Row,3).Range.InsertAfter(Text3);
oDoc.Tables[1].Cell(Row,4).Range.InsertAfter(Text4);
}

private void CreateMailMergeDataFile()
{
Word._Document oDataDoc;
int iCount;

Object oName = "C:\\DataDoc.doc";
Object oHeader = "FirstName, LastName, Address, CityStateZip";
wrdDoc.MailMerge.CreateDataSource(ref oName,ref oMissing, 
ref oMissing,ref oHeader, ref oMissing, ref oMissing, 
ref oMissing, ref oMissing, ref oMissing);

// Open the file to insert data.
oDataDoc = wrdApp.Documents.Open(ref oName,ref oMissing,
ref oMissing, ref oMissing,ref oMissing,ref oMissing,
ref oMissing,ref oMissing,ref oMissing,ref oMissing,
ref oMissing,ref oMissing,ref oMissing,ref oMissing,
ref oMissing/*, ref oMissing */);

for (iCount=1; iCount<=2; iCount++)
{
oDataDoc.Tables[1].Rows.Add(ref oMissing);
}
// Fill in the data.
FillRow(oDataDoc, 2, "Steve", "DeBroux", 
"4567 Main Street", "Buffalo, NY  98052");
FillRow(oDataDoc, 3, "Jan", "Miksovsky", 
"1234 5th Street", "Charlotte, NC  98765");
FillRow(oDataDoc, 4, "Brian", "Valentine", 
"12348 78th Street  Apt. 214", 
"Lubbock, TX  25874");
// Save and close the file.
oDataDoc.Save();
oDataDoc.Close(ref oFalse, ref oMissing, ref oMissing);
}

private void button1_Click(object sender, System.EventArgs e)
{
Word.Selection wrdSelection;
Word.MailMerge wrdMailMerge;
Word.MailMergeFields wrdMergeFields;
Word.Table wrdTable;
string StrToAdd;

// Create an instance of Word  and make it visible.
wrdApp = new Word.Application();
wrdApp.Visible = true;

// Add a new document.
wrdDoc = wrdApp.Documents.Add(ref oMissing,ref oMissing,
ref oMissing,ref oMissing);
wrdDoc.Select();

wrdSelection = wrdApp.Selection;
wrdMailMerge = wrdDoc.MailMerge;

// Create a MailMerge Data file.
CreateMailMergeDataFile();

// Create a string and insert it into the document.
StrToAdd = "State University\r\nElectrical Engineering Department";
wrdSelection.ParagraphFormat.Alignment  = 
Word.WdParagraphAlignment.wdAlignParagraphCenter;
wrdSelection.TypeText(StrToAdd);

InsertLines(4);

// Insert merge data.
wrdSelection.ParagraphFormat.Alignment = 
Word.WdParagraphAlignment.wdAlignParagraphLeft;
wrdMergeFields = wrdMailMerge.Fields;
wrdMergeFields.Add(wrdSelection.Range, "FirstName");
wrdSelection.TypeText(" ");
wrdMergeFields.Add(wrdSelection.Range, "LastName");
wrdSelection.TypeParagraph();

wrdMergeFields.Add(wrdSelection.Range, "Address");
wrdSelection.TypeParagraph();
wrdMergeFields.Add(wrdSelection.Range, "CityStateZip");

InsertLines(2);

// Right justify the line and insert a date field
// with the current date.
wrdSelection.ParagraphFormat.Alignment = 
Word.WdParagraphAlignment.wdAlignParagraphRight;

Object objDate = "dddd, MMMM dd, yyyy";
wrdSelection.InsertDateTime(ref objDate,ref oFalse,ref oMissing, 
ref oMissing, ref oMissing);

InsertLines(2);

// Justify the rest of the document.
wrdSelection.ParagraphFormat.Alignment = 
Word.WdParagraphAlignment.wdAlignParagraphJustify;    

wrdSelection.TypeText("Dear ");
wrdMergeFields.Add(wrdSelection.Range, "FirstName");
wrdSelection.TypeText(",");
InsertLines(2);

// Create a string and insert it into the document.
StrToAdd = "Thank you for your recent request for next " +
"semester's class schedule for the Electrical " +
"Engineering Department. Enclosed with this " +
"letter is a booklet containing all the classes " +
"offered next semester at State University.  " +
"Several new classes will be offered in the " +
"Electrical Engineering Department next semester.  " +
"These classes are listed below.";
wrdSelection.TypeText(StrToAdd);

InsertLines(2);

// Insert a new table with 9 rows and 4 columns.
wrdTable = wrdDoc.Tables.Add(wrdSelection.Range,9,4, 
ref oMissing, ref oMissing);
// Set the column widths.
wrdTable.Columns[1].SetWidth(51, Word.WdRulerStyle.wdAdjustNone);
wrdTable.Columns[2].SetWidth(170, Word.WdRulerStyle.wdAdjustNone);
wrdTable.Columns[3].SetWidth(100, Word.WdRulerStyle.wdAdjustNone);
wrdTable.Columns[4].SetWidth(111, Word.WdRulerStyle.wdAdjustNone);
// Set the shading on the first row to light gray.
wrdTable.Rows[1].Cells.Shading.BackgroundPatternColorIndex = 
Word.WdColorIndex.wdGray25;
// Bold the first row.
wrdTable.Rows[1].Range.Bold = 1;
// Center the text in Cell (1,1).
wrdTable.Cell(1, 1).Range.Paragraphs.Alignment = 
Word.WdParagraphAlignment.wdAlignParagraphCenter;

// Fill each row of the table with data.
FillRow(wrdDoc, 1, "Class Number", "Class Name", 
"Class Time", "Instructor");
FillRow(wrdDoc, 2, "EE220", "Introduction to Electronics II", 
"1:00-2:00 M,W,F", "Dr. Jensen");
FillRow(wrdDoc, 3, "EE230", "Electromagnetic Field Theory I", 
"10:00-11:30 T,T", "Dr. Crump");
FillRow( wrdDoc, 4, "EE300", "Feedback Control Systems", 
"9:00-10:00 M,W,F", "Dr. Murdy");
FillRow(wrdDoc, 5, "EE325", "Advanced Digital Design", 
"9:00-10:30 T,T", "Dr. Alley");
FillRow(wrdDoc, 6, "EE350", "Advanced Communication Systems", 
"9:00-10:30 T,T", "Dr. Taylor");
FillRow(wrdDoc, 7, "EE400", "Advanced Microwave Theory", 
"1:00-2:30 T,T", "Dr. Lee");
FillRow(wrdDoc, 8, "EE450", "Plasma Theory",
"1:00-2:00 M,W,F", "Dr. Davis");
FillRow(wrdDoc, 9, "EE500", "Principles of VLSI Design", 
"3:00-4:00 M,W,F", "Dr. Ellison");

// Go to the end of the document.
Object oConst1 = Word.WdGoToItem.wdGoToLine;
Object oConst2 = Word.WdGoToDirection.wdGoToLast;
wrdApp.Selection.GoTo(ref oConst1,ref oConst2,ref oMissing,ref oMissing);
InsertLines(2);

// Create a string and insert it into the document.
StrToAdd = "For additional information regarding the " +
"Department of Electrical Engineering, " +
"you can visit our Web site at ";
wrdSelection.TypeText(StrToAdd);
// Insert a hyperlink to the Web page.
Object oAddress = "http://www.ee.stateu.tld";
Object oRange = wrdSelection.Range;
wrdSelection.Hyperlinks.Add(oRange, ref oAddress,ref oMissing,
ref oMissing, ref oMissing, ref oMissing);
// Create a string and insert it into the document
StrToAdd = ".  Thank you for your interest in the classes " +
"offered in the Department of Electrical " +
"Engineering.  If you have any other questions, " +
"please feel free to give us a call at " +
"555-1212.\r\n\r\n"  +
"Sincerely,\r\n\r\n" +
"Kathryn M. Hinsch\r\n" +
"Department of Electrical Engineering \r\n";
wrdSelection.TypeText(StrToAdd);

// Perform mail merge.
wrdMailMerge.Destination = Word.WdMailMergeDestination.wdSendToNewDocument;
wrdMailMerge.Execute(ref oFalse);

// Close the original form document.
wrdDoc.Saved = true;
wrdDoc.Close(ref oFalse,ref oMissing,ref oMissing);

// Release References.
wrdSelection = null;
wrdMailMerge = null;
wrdMergeFields = null;
wrdDoc = null;
wrdApp = null;

// Clean up temp file.
System.IO.File.Delete("C:\\DataDoc.doc");
}

    Nota Debe cambiar el código en Visual Studio 2005. De forma predeterminada, Visual C# agrega un formulario al proyecto al crear un proyecto de Windows Forms. El formulario se denomina Form1. Los dos archivos que representan el formulario se denominan Form1.cs y Form1.designer.cs. El código se escribe en Form1.cs. El archivo Form1.designer.cs es donde el diseñador de Windows Forms escribe el código que implementa todas las acciones que ha realizado arrastrando y quitando controles desde el cuadro de herramientas.

    Para obtener más información sobre el Diseñador de Windows Forms en Visual C# 2005, visite el siguiente sitio web de Microsoft Developer Network (MSDN): Creación de un proyecto (Visual C#)Nota Microsoft Office Word 2003 tiene un argumento adicional para el método Open del documento. Si usa el PIA de Word 2003, quite la notación de comentario del parámetro adicional para el método Open.

  7. Agregue lo siguiente a la parte superior de Form1.cs:

    using Word = Microsoft.Office.Interop.Word;

  8. Presione F5 para compilar y ejecutar el programa.

  9. Haga clic en Button1 para iniciar Word Automation y realizar la combinación de correspondencia.

Referencias

Para obtener más información, visite el siguiente sitio web de Microsoft Developer Network (MSDN): Desarrollo de Microsoft Office con Visual Studio Microsoft Office Development con Visual Studio

Para obtener más información, haga clic en el número de artículo siguiente para verlo en Microsoft Knowledge Base:

285332 Cómo automatizar Word 2002 con Visual Basic para crear una combinación de correspondencia