Como automatizar o Microsoft Word para executar a mala direta partir translation from VPE for Csharp Visual

IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine Translation ou MT), não tendo sido portanto traduzido ou revisto por pessoas. A Microsoft possui artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais, com o objetivo de oferecer em português a totalidade dos artigos existentes na base de dados de suporte. No entanto, a tradução automática não é sempre perfeita, podendo conter erros de vocabulário, sintaxe ou gramática. A Microsoft não é responsável por incoerências, erros ou prejuízos ocorridos em decorrência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza atualizações freqüentes ao software de tradução automática (MT). Obrigado.

Clique aqui para ver a versão em Inglês deste artigo: 301659
Para uma versão deste artigo do Microsoft Visual Basic. NET, consulte 301656.
Para obter uma versão Microsoft Visual Basic 6.0 e Microsoft Visual Basic 5.0 deste artigo, consulte 220607.
Sumário
Este artigo demonstra como automatizar o Microsoft Word para criar um documento de mala direta usando o Microsoft Visual translation from VPE for Csharp 2005 ou o Microsoft Visual translation from VPE for Csharp .NET.
Mais Informações
Automação é um processo que permite que aplicativos que são escritos em linguagens como Visual translation from VPE for Csharp 2005 ou Visual translation from VPE for Csharp .NET controlem programaticamente outros aplicativos. Automação do Word permite que você execute ações como criar novos documentos, adicionar texto para documentos e formatação de documentos. Com o Word e outros aplicativos do Microsoft Office, praticamente todas as ações que você pode executar manualmente por meio da interface do usuário também podem ser executadas por meio de programação usando automação.

Word expõe esta funcionalidade através de programação através de um modelo de objeto. O modelo de objeto é uma coleção de classes e métodos que servem como correspondentes para os componentes lógicos do Word. Por exemplo, há um objeto Application , um objeto Document e um objeto Paragraph , cada um deles contém a funcionalidade desses componentes no Word. Para acessar o modelo de objeto de translation from VPE for Csharp Visual .NET ou Visual translation from VPE for Csharp 2005, você pode definir uma referência de projeto para a biblioteca de tipo.

Este artigo demonstra como definir a referência de projeto adequada à biblioteca de tipo do Word para translation from VPE for Csharp Visual .NET e fornece código de exemplo para automatizar o Word.

Criar o exemplo de automação

  1. Inicie Microsoft Visual Studio .NET ou Microsoft Visual Studio 2005.
  2. No menu arquivo , clique em novo e, em seguida, clique em Project . Selecione os tipos de projeto translation from VPE for Csharp Visual Windows Application . O Form1 é criado por padrão.
  3. Adicione uma referência ao Microsoft Word 11.0 Object Library no Visual Studio 2005 ou ao Microsoft Word Object Library no Visual Studio. NET. Para fazer isso, execute as seguintes etapas:
    1. No menu Project , clique em Add Reference .
    2. Na guia COM , localize Microsoft Word Object Library e em seguida, clique em Selecionar .

      No Visual Studio 2005, localize o Microsoft Word 11.0 Object Library na guia COM .

      Observação Microsoft Office 2003 inclui assemblies de interoperabilidade primários (PIAs). Microsoft Office XP não inclui PIAs, mas podem ser baixados. Para obter mais informações sobre PIAs do Office XP, clique no número abaixo para ler o artigo na Base de dados de Conhecimento da Microsoft:
      328912INFO: Microsoft Office XP PIAs estão disponíveis para download
    3. Clique em OK na caixa de diálogo Add References para aceitar as seleções.
  4. No menu Exibir , selecione a caixa de ferramentas para exibir a caixa de ferramentas e, em seguida, adicione um botão ao Form1.
  5. Clique duas vezes em Button1 . A janela de código para o formulário é exibida.
  6. Na janela código, substitua o código seguinte
      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");} 					
    Observação você deve alterar o código no Visual Studio 2005. Por padrão, Visual translation from VPE for Csharp adiciona um formulário para o projeto quando você cria um projeto Windows Forms. O formulário é denominado Form1. Os dois arquivos que representam o formulário são denominados Form1.cs e Form1.Designer.cs. Escrever o código no Form1.cs. O arquivo Form1.Designer.cs é onde o Windows Forms Designer escreve o código que implementa todas as ações que você executou arrastando e soltando controles da caixa de ferramentas.

    Para obter mais informações sobre o Windows Forms Designer no Visual translation from VPE for Csharp 2005, visite o seguinte site da Web Microsoft Developer Network (MSDN): Observação O Microsoft Office Word 2003 tem um argumento adicional para o método Open do documento. Se você estiver usando o PIA do Word 2003, remova a notação de comentário para o parâmetro adicional para o método Open .
  7. Adicione o seguinte na parte superior de Form1.cs:
    using Word = Microsoft.Office.Interop.Word;					
  8. Pressione F5 para criar e executar o programa.
  9. Clique em Button1 para iniciar a automação do Word e para executar a mala direta.
Referências
Para obter mais informações, visite o seguinte Microsoft Developer site Network (MSDN):
Microsoft Office Development com Visual Studio
http://msdn2.microsoft.com/en-us/library/aa188489(office.10).aspx
Para obter mais informações, clique no número abaixo para ler o artigo na Base de dados de Conhecimento da Microsoft:
285332Como automatizar o Word 2002 com o Visual Basic para criar uma mala direta

Aviso: este artigo foi traduzido automaticamente

Propriedades

ID do Artigo: 301659 - Última Revisão: 01/31/2007 19:16:47 - Revisão: 7.5

Microsoft Visual C# 2005 Express Edition, Microsoft Visual C# .NET 2003 Standard Edition, Microsoft Visual C# .NET 2002 Standard Edition, Microsoft Office Word 2003, Microsoft Word 2002 Standard Edition

  • kbmt kbpia kbautomation kbhowto KB301659 KbMtpt
Comentários