C#操作word文档，复制指定页面至新的word

word类库目前用得较多的有a. Free Spire.Doc for .NET b. NPOI c. Microsoft.Office.Interop.Word

其中Spire免费版的有页数限制，会生成水印。本文根据实际需求，采用vs2017下载的Microsoft.Office.Interop.Word操作word文档。

用户可通过右键项目，点击NuGet程序包，搜索word找到Microsoft.Office.Interop.Word，本文安装的版本为12.0.0 如图：

安装完成后，即添加至引用了，使用时只需引入对应命名空间using MSWord = Microsoft.Office.Interop.Word;就可使用了，如图：

下面直接上完整代码，

Object Nothing = System.Reflection.Missing.Value;Object objDocType = WdDocumentType.wdTypeDocument;Object readOnly = false;Object isVisible = true;Object sourceDocPath = @"D:\a.docx";Application wordApp = new ApplicationClass();Document newWordDoc = wordApp.Documents.Add(ref Nothing, ref Nothing, ref Nothing, ref Nothing);Document openWord = wordApp.Documents.Open(ref sourceDocPath, ref Nothing, ref readOnly,ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing,ref Nothing, ref Nothing, ref Nothing, ref isVisible, ref Nothing,ref Nothing, ref Nothing, ref Nothing);Object what = MSWord.WdGoToItem.wdGoToPage;Object which = MSWord.WdGoToDirection.wdGoToFirst;Object count = 7;Object count2 = 8;try{MSWord.Range startRange = wordApp.Selection.GoTo(ref what, ref which, ref count, ref Nothing);MSWord.Range endRange = wordApp.Selection.GoTo(ref what, ref which, ref count2, ref Nothing);endRange.SetRange(startRange.Start, endRange.End - 1);endRange.Select();wordApp.Selection.Copy();newWordDoc.Sections[1].Range.PasteAndFormat(WdRecoveryType.wdFormatOriginalFormatting);// 插入换行符 WdBreakType.wdTextWrappingBreakObject type = WdBreakType.wdSectionBreakNextPage; // 分节符在下一页Object type2 = WdBreakType.wdLineBreakClearLeft; // 换行符// newWordDoc.Sections[1].Range.InsertBreak(ref type2);newWordDoc.Sections[1].Range.InsertBreak(ref type);newWordDoc.Sections[1].Range.InsertBreak(ref type);Object count3 = 5;Object count4 = 6;MSWord.Range startRange2 = wordApp.Selection.GoTo(ref what, ref which, ref count3, ref Nothing);MSWord.Range endRange2 = wordApp.Selection.GoTo(ref what, ref which, ref count4, ref Nothing);endRange2.SetRange(startRange2.Start, endRange2.End - 1);endRange2.Select();wordApp.Selection.Copy();newWordDoc.Sections[1].Range.PasteAndFormat(WdRecoveryType.wdPasteDefault);Object outputFileName = "d:\\test3.doc";Object fileFormat = MSWord.WdSaveFormat.wdFormatDocument97;newWordDoc.SaveAs(ref outputFileName,ref fileFormat, ref Nothing, ref Nothing,ref Nothing, ref Nothing, ref Nothing, ref Nothing,ref Nothing, ref Nothing, ref Nothing, ref Nothing,ref Nothing, ref Nothing, ref Nothing, ref Nothing);newWordDoc.Close(ref Nothing, ref Nothing, ref Nothing);openWord.Close(ref Nothing, ref Nothing, ref Nothing);wordApp.Quit(ref Nothing, ref Nothing, ref Nothing);GC.Collect();}catch (Exception){newWordDoc.Close(ref Nothing, ref Nothing, ref Nothing);openWord.Close(ref Nothing, ref Nothing, ref Nothing);wordApp.Quit(ref Nothing, ref Nothing, ref Nothing);GC.Collect();Console.WriteLine("提取异常！");Console.ReadKey();return;}

注释：本文提取的是第7页和第5页，将提取的页码粘贴至新的word文档中，关键代码就下面这几行：

Object count3 = 5; // 第5页
Object count4 = 6; // 第6页
MSWord.Range startRange2 = wordApp.Selection.GoTo(ref what, ref which, ref count3, ref Nothing);
MSWord.Range endRange2 = wordApp.Selection.GoTo(ref what, ref which, ref count4, ref Nothing);
endRange2.SetRange(startRange2.Start, endRange2.End - 1);  //-1为到第5页未尾字符索引位置
endRange2.Select();  // 选择复制区域
wordApp.Selection.Copy(); // 复制
newWordDoc.Sections[1].Range.PasteAndFormat(WdRecoveryType.wdPasteDefault); // 粘贴至新文档

本文复制的由于不是连续的页，用了两次分节符才能成功，大家有其它改进的可以一起讨论

newWordDoc.Sections[1].Range.InsertBreak(ref type);
newWordDoc.Sections[1].Range.InsertBreak(ref type);

温馨提示：在程序结束前要及时释放对象，不然在打开word文档时可能会卡死或异常

newWordDoc.Close(ref Nothing, ref Nothing, ref Nothing);
openWord.Close(ref Nothing, ref Nothing, ref Nothing);
wordApp.Quit(ref Nothing, ref Nothing, ref Nothing);
GC.Collect();

C#操作word文档，复制指定页面至新的word相关推荐

解决把一篇word文档复制到另一篇word文档时，更改标题格式
问题: 两篇word 文档的标题格式不一致,比如一个标题在一篇文档中的样式是标题1,要将其拷贝到另一篇文档的标题3位置. 解决办法: 1.将word1中的标题1 改称标题3 参考:word2016文档 ...
html word页面展示,word文档怎样调页面
word文档如何调整页面?在页面设置对话框的"页边距2003版"选项卡中选择"方向"为横向或是纵向. Word中怎么设置一个页面显示4页 Word一页只显示四页 ...
word文档粘贴到html,将Word 文档复制到Dreamweaver的方法
将Word 文档复制到Dreamweaver的方法一.用复制的办法. 1.打开Word 文档,复制文本. 2.在Dreamweaver 中,从"编辑"菜单中使用"粘贴& ...
python-docx对Word文档的指定位置(批量)插入图片
python-docx对Word文档的指定位置(批量)插入图片任务实现自动化办公,对请假条.docx文件实现自动插入请假人签名图片. 技术方案 1.python-docx python-docx是 ...
java获取word固定位置的值_java 实现保存Word文档中指定位置的数据,又保存整篇文档...
1:需求用户在线编辑完word 文档后希望保存整篇文档, 同时把保存文档中指定位置的数据 2:方案用 pageoffice 实现既保存Word文档中指定位置的数据,又保存整篇文档 4:核心思想及 ...
Word处理控件Aspose.Words功能演示：在 Java 中将内容从 Word 文档复制到另一个文档
Aspose API 支持旗下产品覆盖文档.图表.PDF.条码.OCR.CAD.HTML.电子邮件等各个文档管理领域,为全球.NET .Java.C ++等10余种平台开发人员提供丰富的开发选择. 在 ...
Word文档在前台页面展示
这篇文章主要是围绕如何实现Word文档在页面上进行预览,以及涉及到相关的技术点,和我们将会在这个功能上使用的插件. 插件:Aspose.Total: Aspose.Total是Aspose公司旗下的最 ...
word文档中指定页加水印_如何在Microsoft Word文档中使用水印
word文档中指定页加水印 A watermark is a faded background image that displays behind the text in a document. Y ...
如何将word文档放入html页面,怎么将Word文档转换为Web页面
为了方便将Word文档在互联网上和局域网上发布,需要将文档保存为Web页面文件.将文档保存为Web页面,这种页面文件使用HTML文件格式.以下是学习啦小编为您带来的关于将Word文档转换为Web页面的 ...

C#操作word文档，复制指定页面至新的word

C#操作word文档，复制指定页面至新的word相关推荐

最新文章

热门文章