Visual C'den Adres Mektup Birleştirme gerçekleştirmek için Microsoft Word'u otomatikleştirme #

  • Makale
  • Şunlara uygulanır:
    Microsoft Word

Bu makalenin Microsoft Visual Basic .NET sürümü için bkz. 301656.

Özet

Bu makalede, Microsoft Visual C# 2005 veya Microsoft Visual C# .NET kullanarak adres mektup birleştirilmiş belge oluşturmak için Microsoft Word'ün nasıl otomatikleştirilecekleri gösterilmektedir.

Daha Fazla Bilgi

Otomasyon, Visual C# 2005 veya Visual C# .NET gibi dillerde yazılmış uygulamaların program aracılığıyla diğer uygulamaları denetlemesine olanak tanıyan bir işlemdir. Word otomasyonu, yeni belgeler oluşturma, belgelere metin ekleme ve belgeleri biçimlendirme gibi eylemler gerçekleştirmenizi sağlar. Word ve diğer Microsoft Office uygulamalarıyla, kullanıcı arabirimi aracılığıyla el ile gerçekleştirebileceğiniz eylemlerin neredeyse tümü Otomasyon kullanılarak program aracılığıyla da gerçekleştirilebilir.

Word bu programlı işlevselliği bir nesne modeli aracılığıyla kullanıma sunar. Nesne modeli, Word'ün mantıksal bileşenlerine karşılık gelen sınıflar ve yöntemler koleksiyonudur. Örneğin, her biri Word'deki bu bileşenlerin işlevselliğini içeren bir Application nesnesi, Bir Document nesnesi ve bir Paragraf nesnesi vardır. Nesne modeline Visual C# 2005 veya Visual C# .NET'ten erişmek için tür kitaplığına bir proje başvurusu ayarlayabilirsiniz.

Bu makalede, Visual C# .NET için Word tür kitaplığına uygun proje başvurusunun nasıl ayarlanacağı gösterilmektedir ve Word'ün otomatikleştirilmesi için örnek kod sağlanır.

Otomasyon Örneği Oluşturma

  1. Microsoft Visual Studio 2005 veya Microsoft Visual Studio .NET'i başlatın.

  2. Dosya menüsünde Yeni'ye ve ardından Proje'ye tıklayın. Visual C# Proje türlerinden Windows Uygulaması'nı seçin. Form1 varsayılan olarak oluşturulur.

  3. Visual Studio 2005'te Microsoft Word 11.0 Nesne Kitaplığı'na veya Visual Studio .NET'teki Microsoft Word Nesne Kitaplığı'na başvuru ekleyin. Bunu yapmak için şu adımları uygulayın:

    1. Proje menüsünde Başvuru Ekle'ye tıklayın.

    2. COM sekmesinde Microsoft Word Nesne Kitaplığı'nı bulun ve Seç'e tıklayın.

      Visual Studio 2005'te, COM sekmesinde Microsoft Word 11.0 Nesne Kitaplığı'nı bulun.

      Not Microsoft Office 2003, Birincil Birlikte Çalışma Derlemelerini (PIA) içerir. Microsoft Office XP PIA içermez, ancak indirilebilir.

    3. Seçimlerinizi kabul etmek için Başvuru Ekle iletişim kutusunda Tamam'a tıklayın.

  4. Görünüm menüsünde Araç Kutusu'nu seçerek araç kutusunu görüntüleyin ve form1'e bir düğme ekleyin.

  5. Düğme1'e çift tıklayın. Formun kod penceresi görüntülenir.

  6. Kod penceresinde aşağıdaki kodu değiştirin

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

    Ile:

    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");
}

    Not Visual Studio 2005'te kodu değiştirmeniz gerekir. Varsayılan olarak, Windows Forms proje oluşturduğunuzda Visual C# projeye bir form ekler. Form, Form1 olarak adlandırılır. Formu temsil eden iki dosya Form1.cs ve Form1.designer.cs olarak adlandırılır. Kodu Form1.cs'de yazarsınız. Form1.designer.cs dosyası, Windows Forms Tasarımcısı'nın Denetimleri Araç Kutusu'ndan sürükleyip bırakarak gerçekleştirdiğiniz tüm eylemleri uygulayan kodu yazdığı yerdir.

    Visual C# 2005'teki Windows Forms Tasarımcısı hakkında daha fazla bilgi için, aşağıdaki Microsoft Geliştirici Ağı (MSDN) Web sitesini ziyaret edin: Proje Oluşturma (Visual C#)Not Microsoft Office Word 2003'ün belgenin Open yöntemi için ek bir bağımsız değişkeni vardır. Word 2003 PIA kullanıyorsanız, Open yöntemi için ek parametrenin açıklama gösterimini kaldırın.

  7. Form1.cs dosyasının en üstüne aşağıdakileri ekleyin:

    using Word = Microsoft.Office.Interop.Word;

  8. Programı derlemek ve çalıştırmak için F5 tuşuna basın.

  9. Word Otomasyonu'na başlamak ve adres mektup birleştirmeyi gerçekleştirmek için Düğme1'e tıklayın.

Başvurular

Daha fazla bilgi için aşağıdaki Microsoft Developer Network (MSDN) Web sitesini ziyaret edin: Visual Studio ile Microsoft Office Geliştirme Visual Studio ile Microsoft Office Geliştirme

Daha fazla bilgi için, Microsoft Bilgi Bankası'ndaki makaleyi görüntülemek üzere aşağıdaki makale numarasına tıklayın:

285332 Adres Mektup Birleştirme Oluşturmak için Visual Basic ile Word 2002'yi Otomatikleştirme