zoukankan      html  css  js  c++  java
  • WORD/EXCEL内容替换

    最近,在做一个小项目时,需要用到WORD/EXCEL(目前只针对OFFICE2003)文档中内容的替换,在网上搜寻了一番,找到了一些解决方法,自己再整理了一下,记录出来与大家共享。

    1、在项目的引用中添加WORD和EXCEL的COM引用:Microsoft.Word 11.0 Object Library和Microsoft.Excel 11.0 Object Library;

    2、在文件的USING部分加入以下命名空间:

    using Microsoft.Office.Core;
    using Microsoft.Office.Interop.Word;
    using Microsoft.Office.Interop.Excel;
    using System.IO;
    using System.Reflection;

    3、定义WORD和EXCEL内容替换函数:

            private void WordReplace(string filePath, string strOld, string strNew)
            {
                Microsoft.Office.Interop.Word.Application app = new Microsoft.Office.Interop.Word.ApplicationClass();
                object nullobj = System.Reflection.Missing.Value;
                object file = filePath;
                Microsoft.Office.Interop.Word.Document doc = app.Documents.Open(
                ref file, ref nullobj, ref nullobj,
                ref nullobj, ref nullobj, ref nullobj,
                ref nullobj, ref nullobj, ref nullobj,
                ref nullobj, ref nullobj, ref nullobj,
                ref nullobj, ref nullobj, ref nullobj, ref nullobj);

                doc.Content.Text = doc.Content.Text.Replace(strOld, strNew);
                doc.Content.AutoFormat();
                Microsoft.Office.Interop.Word.Range range = null;
                doc.Close(ref nullobj, ref nullobj, ref nullobj);

                app.Quit(ref nullobj, ref nullobj, ref nullobj);
            }

            private void ExcelReplace(string filePath, string strOld, string strNew)
            {
                Microsoft.Office.Interop.Excel.Application excel = new Microsoft.Office.Interop.Excel.ApplicationClass();
                excel.Visible = false;

                string modelFile = filePath;  //文件名
                Workbook wb = excel.Workbooks._Open(modelFile, Missing.Value, Missing.Value, Missing.Value, Missing.Value
                 , Missing.Value, Missing.Value, Missing.Value, Missing.Value
                 , Missing.Value, Missing.Value, Missing.Value, Missing.Value);
                Worksheet xSheet = (Worksheet)wb.Sheets[1];
                int icount = wb.Sheets.Count;
                for (int i = 1; i <= icount; i++)
                {
                    try
                    {
                        xSheet = (Worksheet)wb.Sheets[i];
                        object what = strOld;  //查找字符串
                        object retxt = strNew; //替换字符串
                        xSheet.Cells.Replace(what, retxt, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);
                    }
                    catch
                    {
                    }
                }
                wb.Save();
                NAR(xSheet);
                wb.Close(false, Missing.Value, Missing.Value);
                NAR(wb);
                excel.Quit();
                NAR(excel);
                System.GC.Collect();
            }

            private void NAR(object o)
            {
                try
                {
                    System.Runtime.InteropServices.Marshal.ReleaseComObject(o);//强制释放一个对象
                }
                catch
                {
                }
                finally
                {
                    o = null;
                }
            }

    4、代码中直接调用这两个函数即可。

  • 相关阅读:
    IOI2021集训队作业 CK String Theory
    IOI2021集训队作业 123ED Gem Island
    IOI2021集训队作业 121MB Bipartite Blanket
    ASP.NET站点Web部署(一键发布的实现)
    HTTP文件上传
    前言
    关于 Mybatis的原生连接池 和 DBCP 连接池
    linux 学习 端口占用 && 内存使用
    跨域问题
    Cassandra 学习三 安装
  • 原文地址:https://www.cnblogs.com/tianfu/p/1445540.html
Copyright © 2011-2022 走看看