C#操作Word详解

C#操作 Word

Word 对象模型图

Application: 用来表现 WORD 应用程序，包含其它所有对象。他的成员经常应用于整个 Word，可以用它的属性

和方法控制 Word 环境。

Document 对象: Document 对象是 Word 编程的核心。当打开一个已有的文档或创建一个新的文档时，就创建了

一个新的 Document 对象，新创建的 Document 将会被添加到 Word Documents Collection。

Selection: Selection 对象是描述当前选中的区域。若选择区域为空，则认为是当前光标处。

Rang: 是 Document 的连续部分，根据起始字符的结束字符定议位置。

thisApplication.Cation=””;

thisApplication.Visible=true;

thisApplication.Options.CheckSpellingAsYouType=false;

thisApplication.Options.CheckGrammarAsYouType=false;

Object filename=FileName;

Object ConfirmConversions=false;

Object ReadOnly=false;

Object AddToRecentFiles=false;

Object PasswordDocument=System.Type.Missing;

Object Visible=System.Type.Missing;

Object OpenAndRepair=System.Type.Missing;

Object DocumentDirection=System.Type.Missing;

Object NoEncodingDialog=System.Type.Missing;

Object XMLTransform=System.Type.Missing;

//999 999 99Microsoft.Office.Interop.Word.DocumentClass wordDoc =

//999 999 99 wordApp.Documents.Open(ref filename, ref ConfirmConversions,

//999 999 999 999 ref ReadOnly, ref AddToRecentFiles, ref PasswordDocument, ref PasswordTemplate,

//999 999 999 999 ref Revert,ref WritePasswordDocument, ref WritePasswordTemplate, ref Format,

//999 999 999 999 ref Encoding, ref Visible);

999 999 999 999 thisApplication.Documents.Open(ref filename, ref ConfirmConversions,

999 999 999 999 ref ReadOnly, ref AddToRecentFiles, ref PasswordDocument, ref PasswordTemplate,

999 999 999 999 ref Revert,ref WritePasswordDocument, ref WritePasswordTemplate, ref Format,

999 999 999 999 ref Encoding, ref Visible, ref OpenAndRepair, ref DocumentDirection,

999 999 999 999 ref NoEncodingDialog, ref XMLTransform );

999 999 999 this.thisDocument = wordDoc;

999 999 999 formFields = wordDoc.FormFields;

999 999 }

}

关闭 WORD 程序:

//Clear out any existing information

Object start=Type.Missing;

Object end=Type.Missing;

Object unit=Type.Missing;

Object count=Type.Missing;

ThisDocument.Range(ref start,ref end).Delete(ref unit,ref count);

//Set up the header information

Start=0;

End=0;

rng=ThisDocument.Range(ref start,ref end);

Object location=8; //注：若 location 超过已有字符的长度将会出错

Word.Range rng=ThisDocument.Range(ref location,ref location);

ThisDocument.Tables.Add(rng,3,4,ref missingValue,ref missingValue);

以下为在刚创建的表格里添加一行:

Word.Table tbl=ThisDocument.Tables[1]; //第一个表格为 1，而不是 0

Object beforeRow=Type.Missing;

tbl.Rows.Add(ref beforeRow); //在表格的最后添加一行

填充表格内容:

tbl.Cell(1,1).Range.Text=”shuai”; //在表格的第一行第一列填入内容

设置单元格风格:

Word.Range rngCell;

rngCell=tbl.Cell(1,2).Range;

rngCell.ParagraphFormat.Alignment=Word.WdParagraphAlignment.wdAlignParagraphRight;

rngCell.FontSize=8;

rngCell.Font.Name=”Verdana”;

object filename=”…”; //要打开的文档路径

string strKey=”…”; //要搜索的文本

object MissingValue=Type.Missing;

Word.Application wp=new Word.ApplicationClass();

Word.Document wd=wp.Documents.Open(ref filename,ref MissingValue,ref MissingValue,

ref MissingValue,ref MissingValue,ref MissingValue,

ref MissingValue,ref MissingValue,ref MissingValue,

ref MissingValue,ref MissingValue,ref MissingValue,

ref MissingValue,ref MissingValue,ref MissingValue,

ref MissingValue);

MessageBox.Show(“文档中没有指定的关键字！”,”搜索结果”,MessageBoxButton.OK);

}

不过，这种做法很勉强的，对小文档来说，不存在问题，对超长超大的文档来说，这样实现方法已经暗埋 bug

了，而且是程序级的 bug，因为正常的测试会很难发现问题，在使用中导致程序出现什么样的结果也很难量化描述。

其实，在 Word 中已经提供了可以用作搜索的对象 Find，在对象模型上也比较容易找到，对应的说明是这样的：该对

象代表查找操作的执行条件。Find 对象的属性和方法与“替换”对话框中的选项一致。从模型上看， Find 对象是

Selection 的成员，从示例代码来看似乎也是 Range 的成员，查找 Range 的属性，果然如此。修改代码如下：

wd.Content.Find.Text=strKey;

if(wd.Content.Find.Execute(ref MissingValue,ref MissingValue,ref MissingValue,ref MissingValue,

ref MissingValue,ref MissingValue,ref MissingValue,ref MissingValue,

ref MissingValue,ref MissingValue,ref MissingValue,ref MissingValue,

ref MissingValue,ref MissingValue,ref MissingValue))

{

MessageBox.Show(“文档中包含指定的关键字！”,”搜索结果”,MessageBoxButtons.OK);

…

Int i=0,iCount=0;

if(wd.Paragraphs!=null && wd.Paragraphs.Count>0)

{

iCount=wd.Paragraphs.Count;

for(i=1;i<iCount;i++)

wfnd.Execute(ref MissingValue,ref MissingValue,ref MissingValue,ref MissingValue,

wfnd.Execute(ref MissingValue,ref MissingValue,ref MissingValue))

{

MessageBox.Show(“文档中包含指定的关键字！”,”搜索结果”,MessageBoxButtons.OK);

}

}

}