以编程方式将页脚添加到 Office Word/Excel 文档

Question

我正在寻求构建一个与此类似的解决方案： http://esqinc.com/section/products/4/idocid.html

系统所做的是将文档文件名插入到文档页脚中。这如何以编程方式实现（最好是在 .NET 中）？

Answer 1

希望这能让你开始。以下伪 C# 代码可用于向页脚添加文本。只有您必须在宏中执行此操作才能完全自动化，并确定要添加的文档名称。最后在文档保存期间调用宏以添加页脚文本。

foreach ( Section wordSection in wordDoc.Sections )
{
  HeaderFooter footer = wordSection.Footers[ Microsoft.Office.Interop.Word.WdHeaderFooterIndex.wdHeaderFooterPrimary ];
  footer.Range.Select( );
  footer.Range.Text = footerTxt;
  hf.Range.Font.Size = 10;
  wordApp.Selection.Paragraphs[ 1 ].Alignment = WdParagraphAlignment.wdAlignParagraphLeft;
  wordApp.Selection.Paragraphs[ 1 ].SpaceAfter = 0;
}

Answer 2

我只是碰巧正在编写代码，我已经在 Excel 中从 C# 执行此操作...这是部分的，并且将帮助您开始...

Microsoft.Office.Interop.Excel.Application excelapp = new Microsoft.Office.Interop.Excel.Application();
excelapp.Visible = true;
Microsoft.Office.Interop.Excel._Workbook book = (Microsoft.Office.Interop.Excel._Workbook)excelapp.Workbooks.Add(Microsoft.Office.Interop.Excel.XlWBATemplate.xlWBATWorksheet); ;
Microsoft.Office.Interop.Excel._Worksheet sheet = (Microsoft.Office.Interop.Excel._Worksheet)book.ActiveSheet;


sheet.get_Range("A1", "N999").Font.Size = "8";
sheet.PageSetup.PaperSize = Microsoft.Office.Interop.Excel.XlPaperSize.xlPaperLegal;
sheet.PageSetup.Orientation = Microsoft.Office.Interop.Excel.XlPageOrientation.xlLandscape;
sheet.PageSetup.PrintTitleRows = "$3:$5";
sheet.PageSetup.PrintTitleColumns = "$A:$B";

那里的代码比您完成此特定任务所需的代码要多，但是相关行具有标题（或在每个页面顶部重复的内容）为：

sheet.PageSetup.PrintTitleRows = "$3:$5";
sheet.PageSetup.PrintTitleColumns = "$A:$B";

编辑 - 添加

这里是 MSDN 文档的链接，可满足您的所有 Office Interop 需求。

http://msdn.microsoft.com/en-us /library/bb209015(office.12).aspx