我想使用C#和Interop在Microsft Word文档中用正常的段落标记代码^ p替换段落标记(^ 13)的所有替代码。
我一直在使用Microsoft.Office.Interop.Word.Selection.Find.Execute()方法。
例如......
.Application.ActiveWindow.Selection.Find.Execute(
ref findText,
ref matchCase,
ref matchWholeWord,
ref matchWildcards,
ref matchSoundsLike,
ref matchAllWordForms,
ref findForward,
ref findWrap,
ref findFormat,
ref replaceText,
ref replaceAll,
ref missing,
ref missing,
ref missing,
ref missing);
使用上面的代码,^ 13标记不会被^ p标记替换。
有谁知道如何纠正这个问题?
答案 0 :(得分:1)
检查下面的代码:
// Create the Word application and declare a document
Word.Application word = new Word.Application();
Word.Document doc = new Word.Document();
// Define an object to pass to the API for missing parameters
object missing = System.Type.Missing;
try
{
// Everything that goes to the interop must be an object
object fileName = @"D:\test.docx";
// Open the Word document.
// Pass the "missing" object defined above to all optional
// parameters. All parameters must be of type object,
// and passed by reference.
doc = word.Documents.Open(ref fileName,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing);
// Activate the document
doc.Activate();
// Loop through the StoryRanges (sections of the Word doc)
foreach (Word.Range tmpRange in doc.StoryRanges)
{
// Set the text to find and replace
tmpRange.Find.Text = "xml";
tmpRange.Find.Replacement.Text = "XML";
// Set the Find.Wrap property to continue (so it doesn't
// prompt the user or stop when it hits the end of
// the section)
tmpRange.Find.Wrap = Word.WdFindWrap.wdFindContinue;
// Declare an object to pass as a parameter that sets
// the Replace parameter to the "wdReplaceAll" enum
object replaceAll = Word.WdReplace.wdReplaceAll;
// Execute the Find and Replace -- notice that the
// 11th parameter is the "replaceAll" enum object
tmpRange.Find.Execute(ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref replaceAll,
ref missing, ref missing, ref missing, ref missing);
}
// Save the changes
doc.Save();
// Close the doc and exit the app
doc.Close(ref missing, ref missing, ref missing);
word.Application.Quit(ref missing, ref missing, ref missing);
}
catch (Exception ex)
{
doc.Close(ref missing, ref missing, ref missing);
word.Application.Quit(ref missing, ref missing, ref missing);
System.Diagnostics.Process.Start("D:\\test.docx");
}
还有一件事:请注意:使用Word = Microsoft.Office.Interop.Word;
答案 1 :(得分:0)
如果我没有错,你不能打电话找到并替换段落,但你可以改变它们的风格paragraph