Stuck when creating Word doc using interop dll c#

I am getting data services layer as list it as 10 count

I looping it writing a word docment

My expectation is one list for one page

but my out put each list overwritting next list finally only 10 th list comes in output one page.

please help on this

//code

private void CreateDocument(List orr)

{

try

{

List QRR = RTS.GETQRR_Document(orr);

Microsoft.Office.Interop.Word.Application winword = new Microsoft.Office.Interop.Word.Application();

winword.ShowAnimation = false;

winword.Visible = true;

object missing = System.Reflection.Missing.Value;

Microsoft.Office.Interop.Word.Document document = winword.Documents.Add(ref missing, ref missing, ref missing, ref missing);

// for loop for each word for each list

foreach (var Qr in QRR)

{

foreach (Microsoft.Office.Interop.Word.Section section in document.Sections)

{

Microsoft.Office.Interop.Word.Range headerRange = section.Headers[Microsoft.Office.Interop.Word.WdHeaderFooterIndex.wdHeaderFooterPrimary].Range;

headerRange.Fields.Add(headerRange, Microsoft.Office.Interop.Word.WdFieldType.wdFieldPage);

headerRange.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphCenter;

headerRange.Font.ColorIndex = Microsoft.Office.Interop.Word.WdColorIndex.wdBlack;

headerRange.Font.Size = 13;

headerRange.Font.Name = "Arial";

headerRange.Text = Qr.HEADER;

}

foreach (Microsoft.Office.Interop.Word.Section wordSection in document.Sections)

{

//Get the footer range and add the footer details.

Microsoft.Office.Interop.Word.Range footerRange = wordSection.Footers[Microsoft.Office.Interop.Word.WdHeaderFooterIndex.wdHeaderFooterPrimary].Range;

footerRange.Font.ColorIndex = Microsoft.Office.Interop.Word.WdColorIndex.wdDarkRed;

footerRange.Font.Size = 10;

footerRange.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphCenter;

footerRange.Text = "Footer text goes here";

}

document.Content.SetRange(0, 0);

document.Content.Text = Qr.TECH + Environment.NewLine;

Microsoft.Office.Interop.Word.Paragraph para1 = document.Content.Paragraphs.Add(ref missing);

//object styleHeading1 = "Heading 1";

para1.Range.Text = Qr.DESCRIPTION1;

para1.Range.InsertParagraphAfter();

//Add paragraph with Heading 2 style

Microsoft.Office.Interop.Word.Paragraph para2 = document.Content.Paragraphs.Add(ref missing);

object styleHeading2 = "Heading 1";

para2.Range.set_Style(ref styleHeading2);

para2.Range.Text = Qr.FIT_RATE_CONTENT + Qr.TEMPRATURE;

para2.Range.InsertParagraphAfter();

//Create a 5X5 table and insert some dummy record

Word.Table objTable = document.Tables.Add(para1.Range, 5, 7, ref missing, ref missing);

objTable.Borders.Enable = 1;

objTable.Range.ParagraphFormat.SpaceAfter = 7;

string strText;

strText = "Failure Mechanisms";

objTable.Rows[1].Range.Text = strText;

objTable.Rows[1].Range.Font.Bold = 1;

objTable.Rows[1].Range.Font.Size = 7;

objTable.Rows[2].Range.Font.Size = 7;

objTable.Rows[3].Range.Font.Size = 7;

objTable.Rows[4].Range.Font.Size = 7;

objTable.Rows[5].Range.Font.Size = 7;

objTable.Rows[1].Range.Font.Position = 1;

objTable.Rows[1].Range.Font.Name = "Arial";

objTable.Rows[2].Range.Font.Name = "Arial";

objTable.Rows[3].Range.Font.Name = "Arial";

objTable.Rows[4].Range.Font.Name = "Arial";

objTable.Rows[5].Range.Font.Name = "Arial";

objTable.Rows[1].Cells[1].Merge(objTable.Rows[3].Cells[1]);

//objTable.Range.SetRange(1, 3);

//objTable.Cell(1,1).Merge

objTable.Cell(1, 2).Merge(objTable.Cell(1, 3));

objTable.Cell(1, 4).Merge(objTable.Cell(1, 5));

objTable.Cell(2, 4).Split(1, 5);

objTable.Cell(2, 4).Range.Text = "EAev";

objTable.Cell(2, 5).Range.Text = "TAF";

objTable.Cell(2, 6).Range.Text = "VAF";

objTable.Cell(2, 7).Range.Text = "OAF";

objTable.Cell(2, 8).Range.Text = "MTTF(Yrs)";

objTable.Cell(1, 5).Delete();

objTable.Cell(4, 7).Delete();

objTable.Cell(5, 7).Delete();

objTable.Cell(2, 11).Delete();

objTable.Cell(3, 7).Delete();

objTable.Cell(1, 1).Range.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphCenter;

objTable.Cell(1, 3).Width = 130;

objTable.Cell(4, 4).Width = 130;

objTable.Cell(5, 4).Width = 130;

objTable.Cell(4, 2).Width = 50;

objTable.Cell(4, 3).Width = 100;

objTable.Cell(5, 2).Width = 50;

objTable.Cell(5, 3).Width = 100;

objTable.Cell(4, 1).Range.Text = "";

objTable.Cell(5, 1).Range.Text = "";

objTable.Cell(2, 4).Width = 24;

objTable.Cell(2, 5).Width = 25;

objTable.Cell(2, 6).Width = 25;

objTable.Cell(2, 7).Width = 26;

objTable.Cell(2, 8).Width = 30;

objTable.Cell(4, 1).Range.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphCenter;

objTable.Cell(5, 1).Range.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphCenter;

objTable.Cell(1, 2).Range.Text = "";

objTable.Cell(2, 2).Range.Text = "";

objTable.Cell(2, 3).Range.Text = " ";

objTable.Cell(1, 3).Range.Text = "";

objTable.Cell(1, 4).Range.Text = "";

objTable.Cell(2, 9).Range.Text = "";

objTable.Cell(2, 10).Range.Text = "";

objTable.Cell(3, 2).Split(1, 2);

objTable.Cell(3, 2).Range.Text = "24";

objTable.Cell(3, 2).Next.Range.Text = "48";

objTable.Cell(3, 4).Split(1, 3);

objTable.Cell(1, 2).Width = 150;

objTable.Cell(2, 2).Width = 50;

objTable.Cell(2, 3).Width = 100;

objTable.Cell(3, 2).Width = 25;

objTable.Cell(3, 3).Width = 25;

objTable.Cell(3, 4).Width = 32;

objTable.Cell(3, 5).Width = 34;

objTable.Cell(3, 6).Width = 34;

objTable.Cell(3, 4).Range.Text = "";

objTable.Cell(3, 5).Range.Text = "";

objTable.Cell(3, 6).Range.Text = "";

objTable.Cell(3, 7).Width = 130;

objTable.Cell(1, 2).Range.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphCenter;

objTable.Cell(1, 4).Range.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphCenter;

if (Qr.DR_REQ == "YES")

{

Word.Paragraph para3 = document.Content.Paragraphs.Add(ref missing);

// object styleHeading2 = "Heading 2";

// para3.Range.set_Style(ref styleHeading2);

para3.Range.Text = Qr.DESCRIPTION2;

para3.Range.InsertParagraphAfter();

Word.Table secondtab = document.Tables.Add(para2.Range, 4, 5, ref missing, ref missing);

secondtab.Borders.Enable = 1;

}

//l winword.Selection.InsertNewPage();

//Save the document

}

object filename = @"D:\temp5.docx";

document.SaveAs2(ref filename);

document.Close(ref missing, ref missing, ref missing);

document = null;

winword.Quit(ref missing, ref missing, ref missing);

winword = null;

}

catch (Exception ex)

{

}

1 Reply

Know the answer? Post it — somebody with the same question will find it here.

Jefferson S. Motta7y ago
office interop is not good.

try create an folder on your app:

\TEMPLATE

with an empty word document:

EmptyDoc.docx

So, instead create, you copy the empty file to use in another place, and then open the file and write as you need.

I hope this could help you.

Best regards,

Jeff