3

我有一个 word 2007.doc文件,其中包含多个按部分分隔的子文档。

有没有办法从文档中删除所有分节符?

我已尝试查找并替换它们,但收到错误消息。

private void RemoveAllSectionBreaks(Word.Document doc)
{
    Word.Find find = doc.Range(ref oMissing, ref oMissing).Find;
    find.ClearFormatting();
    //find.Text = "^b"; // This line throws an error
    find.Text =((char)12).ToString(); // Same error when attempting it this way
    find.Replacement.ClearFormatting();
    find.Replacement.Text = "";

    find.Execute(ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, Word.WdReplace.wdReplaceAll, ref oMissing, ref oMissing, ref oMissing, ref oMissing);
}

find.Text行将产生错误 -

用户代码未处理 SEHException

外部组件引发的异常。

我没有得到任何关于错误可能是什么的进一步细节。该代码在 Word 2003 中工作正常,但我需要在 Word 2007 中工作。

我是否遵循 2007 年单词的正确方法?

4

2 回答 2

7

我最终采用了不同的方法。由于单词查找功能导致错误,我决定对搜索/删除进行编码。以下代码删除了它遇到的所有分节符。

private void RemoveAllSectionBreaks(Word.Document doc)
{
    Word.Sections sections = doc.Sections;
    foreach (Word.Section section in sections)
    {
        section.Range.Select();
        Word.Selection selection = doc.Application.Selection;
        object unit = Word.WdUnits.wdCharacter;
        object count = 1;
        object extend = Word.WdMovementType.wdExtend;
        selection.MoveRight(ref unit, ref count, ref oMissing);
        selection.MoveLeft(ref unit, ref count, ref extend);
        selection.Delete(ref unit, ref count);
    }
}
于 2012-12-19T16:45:58.640 回答
1

回归较晚,但​​我使用的另一个解决方案是,您也可以使用 vsto 查找和替换使用“^m”作为节和“^p”作为段落替换分节符,或者用空字符串替换分节符。

using Word = Microsoft.Office.Interop.Word;

object missing = Missing.Value;
Word.Document tmpDoc = wordApp.Documents.Open(fileToOpen);

object findText = "^m";
object replaceText = "^p^p";
tmpDoc.Range().Find.Execute(ref findText,
    true, true, true, ref missing, ref missing, ref missing,
    ref missing, ref missing, ref replaceText, Word.WdReplace.wdReplaceAll, 
    ref missing, ref missing, ref missing, ref missing);
于 2013-02-20T20:30:32.273 回答