Como automatizar o Microsoft Word para efetuar a PostalIzação de Correio a partir do Visual C #

  • Artigo
  • Aplica-se a:
    Microsoft Word

Para uma versão do Microsoft Visual Basic .NET deste artigo, consulte o 301656.

Resumo

Este artigo demonstra como automatizar o Microsoft Word para criar um documento intercalado com o Microsoft Visual C# 2005 ou o Microsoft Visual C# .NET.

Mais Informações

A automatização é um processo que permite que as aplicações escritas em idiomas como o Visual C# 2005 ou Visual C# .NET controlem outras aplicações através de programação. A automatização do Word permite-lhe executar ações como criar novos documentos, adicionar texto a documentos e formatar documentos. Com o Word e outras aplicações do Microsoft Office, praticamente todas as ações que pode realizar manualmente através da interface de utilizador também podem ser executadas através de programação através da Automatização.

O Word expõe esta funcionalidade programática através de um modelo de objeto. O modelo de objeto é uma coleção de classes e métodos que servem como homólogos para os componentes lógicos do Word. Por exemplo, existe um objeto Application, um objeto Document e um objeto Paragraph, cada um deles com a funcionalidade desses componentes no Word. Para aceder ao modelo de objeto a partir do Visual C# 2005 ou Visual C# .NET, pode definir uma referência de projeto para a biblioteca de tipos.

Este artigo demonstra como definir a referência de projeto adequada para a biblioteca de tipos do Word para Visual C# .NET e fornece código de exemplo para automatizar o Word.

Criar a Amostra de Automatização

  1. Inicia o Microsoft Visual Studio 2005 ou o Microsoft Visual Studio .NET.

  2. No menu Ficheiro, clique em Novo e, em seguida, clique em Projeto. Selecione Aplicação do Windows a partir dos tipos de Projeto Visual C#. O formulário1 é criado por predefinição.

  3. Adicione uma referência à Biblioteca de Objetos do Microsoft Word 11.0 no Visual Studio 2005 ou à Biblioteca de Objetos do Microsoft Word no Visual Studio .NET. Para tal, siga estes passos:

    1. No menu Projeto, clique em Adicionar Referência.

    2. No separador COM, localize Biblioteca de Objetos do Microsoft Word e, em seguida, clique em Selecionar.

      No Visual Studio 2005, localize Biblioteca de Objetos do Microsoft Word 11.0 no separador COM .

      Nota O Microsoft Office 2003 inclui Conjuntos de Interojuntas Principais (PIAs). O Microsoft Office XP não inclui PIAs, mas estes podem ser transferidos.

    3. Clique em OK na caixa de diálogo Adicionar Referências para aceitar as suas seleções.

  4. No menu Ver, selecione Caixa de Ferramentas para apresentar a caixa de ferramentas e, em seguida, adicione um botão ao Formulário1.

  5. Faça duplo clique em Botão1. A janela de código do formulário é exibida.

  6. Na janela do código, substitua o seguinte código

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

    com:

    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 Tem de alterar o código no Visual Studio 2005. Por predefinição, o Visual C# adiciona um formulário ao projeto quando cria um Windows Forms projeto. O formulário tem o nome Formulário1. Os dois ficheiros que representam o formulário são denominados Formulário1.cs e Form1.designer.cs. O código é escrito no Formulário1.cs. O ficheiro Form1.designer.cs é onde o Estruturador do Windows Forms escreve o código que implementa todas as ações que efetuou ao arrastar e largar controlos da Caixa de Ferramentas.

    Para obter mais informações sobre o Estruturador do Windows Forms no Visual C# 2005, visite o seguinte site do Microsoft Developer Network (MSDN): Criar um Projeto (Visual C#)Nota: o Microsoft Office Word 2003 tem um argumento adicional para o método Abrir do documento. Se estiver a utilizar o PIA do Word 2003, remova a notação de comentário do parâmetro adicional do método Abrir.

  7. Adicione o seguinte ao topo de Formulário1.cs:

    using Word = Microsoft.Office.Interop.Word;

  8. Prima F5 para criar e executar o programa.

  9. Clique no Botão1 para iniciar a Automatização do Word e efetuar a mesma.

Referências

Para obter mais informações, visite o seguinte site do Microsoft Developer Network (MSDN): Microsoft Office Development com Visual Studio Microsoft Office Development com Visual Studio

Para obter mais informações, clique no seguinte número de artigo para ver o artigo na Base de Dados de Conhecimento Microsoft:

285332 Como Automatizar o Word 2002 com o Visual Basic para Criar uma Mensagem de Correio