【C# 在word文档中复制表格并粘帖到下一页中】
object oMissing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word._Application oWord;Microsoft.Office.Interop.Word._Document oDoc;
oWord = new Microsoft.Office.Interop.Word.Application();
//显示word文档
oWord.Visible = true;
//取得word文件模板
object fileName = System.Windows.Forms.Application.StartupPath + "\\word.doc";
//根据模板生成一个新文档,相当于另存为
oDoc = oWord.Documents.Add(ref fileName, ref oMissing,
ref oMissing, ref oMissing);
//复制第一个表格
oDoc.Tables[1].Select();
oWord.Selection.Copy();
//在这里操作表格中的文本
oDoc.Tables[1].Cell(1, 1).Range.Text = "这是第一个表格";
//下一页
object mymissing = System.Reflection.Missing.Value;
object myunit = Microsoft.Office.Interop.Word.WdUnits.wdStory;
oWord.Selection.EndKey(ref myunit, ref mymissing);
object pBreak = (int)Microsoft.Office.Interop.Word.WdBreakType.wdPageBreak;
oWord.Selection.InsertBreak(ref pBreak);
//粘贴第一个表格
oWord.Selection.Paste();
oDoc.Tables[2].Cell(1, 1).Range.Text = "这是第二个表格";
【C#实现WORD文档的内容复制和替换】
第一:复制模板的内容到一个Document对象里从源DOC文档复制内容返回一个Document类#region 从源DOC文档复制内容返回一个Document类
/// <summary>
/// 从源DOC文档复制内容返回一个Document类
/// </summary>
/// <param name="sorceDocPath">源DOC文档路径</param>
/// <returns>Document</returns>
protected Document copyWordDoc(object sorceDocPath)
{
object objDocType = WdDocumentType.wdTypeDocument;
object type = WdBreakType.wdSectionBreakContinuous;
//Word应用程序变量
Application wordApp;
//Word文档变量
Document newWordDoc;
object readOnly = false;
object isVisible = false;
//初始化
//由于使用的是COM库,因此有许多变量需要用Missing.Value代替
wordApp = new ApplicationClass();
Object Nothing = System.Reflection.Missing.Value;
//wordDoc = wordApp.Documents.Add(ref Nothing, ref Nothing, ref Nothing, ref Nothing);
newWordDoc = wordApp.Documents.Add(ref Nothing, ref Nothing, ref Nothing, ref Nothing);
Document openWord;
openWord = wordApp.Documents.Open(ref sorceDocPath, 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);
openWord.Select();
openWord.Sections[1].Range.Copy();
object start = 0;
Range newRang = newWordDoc.Range(ref start, ref start);
//插入换行符
//newWordDoc.Sections[1].Range.InsertBreak(ref type);
newWordDoc.Sections[1].Range.PasteAndFormat(WdRecoveryType.wdPasteDefault);
openWord.Close(ref Nothing, ref Nothing, ref Nothing);
return newWordDoc;
}
#endregion第二:替换复制好内容的Document的标识字符替换指定Document的内容,并保存到指定的路径#region 替换指定Document的内容,并保存到指定的路径
/// <summary>
/// 替换指定Document的内容,并保存到指定的路径
/// </summary>
/// <param name="docObject">Document</param>
/// <param name="savePath">保存到指定的路径</param>
protected void ReplaceWordDocAndSave(Document docObject, object savePath)
{
object format = WdSaveFormat.wdFormatDocument;
object readOnly = false;
object isVisible = false;
string strOldText = "{WORD}";
string strNewText = "{替换后的文本}";
List<string> IListOldStr = new List<string>();
IListOldStr.Add("{WORD1}");
IListOldStr.Add("{WORD2}");
Object Nothing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application wordApp = new ApplicationClass();
//Microsoft.Office.Interop.Word.Document oDoc = wordApp.Documents.Open(ref obj, 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);
Microsoft.Office.Interop.Word.Document oDoc = docObject;
object FindText, ReplaceWith, Replace;
object MissingValue = Type.Missing;
foreach (string str in IListOldStr)
{
oDoc.Content.Find.Text = str;
//要查找的文本
FindText = str;
//替换文本
ReplaceWith = strNewText;
//wdReplaceAll - 替换找到的所有项。
//wdReplaceNone - 不替换找到的任何项。
//wdReplaceOne - 替换找到的第一项。
Replace = Microsoft.Office.Interop.Word.WdReplace.wdReplaceAll;
//移除Find的搜索文本和段落格式设置
oDoc.Content.Find.ClearFormatting();
if (oDoc.Content.Find.Execute(ref FindText, ref MissingValue, ref MissingValue, ref MissingValue, ref MissingValue, ref MissingValue, ref MissingValue, ref MissingValue, ref MissingValue, ref ReplaceWith, ref Replace, ref MissingValue, ref MissingValue, ref MissingValue, ref MissingValue))
{
Response.Write("替换成功!");
Response.Write("<br>");
}
else
{
Response.Write("没有相关要替换的:(" + str + ")字符");
Response.Write("<br>");
}
}
oDoc.SaveAs(ref savePath, 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, ref Nothing);
//关闭wordDoc文档对象
oDoc.Close(ref Nothing, ref Nothing, ref Nothing);
//关闭wordApp组件对象
wordApp.Quit(ref Nothing, ref Nothing, ref Nothing);
}
#endregion用到了C#操作WORD的复制,替换,和创建WORD文档的知识。