WordEditor 删除文档末尾的空行

WordEditor remove blank lines at end of document

我正在尝试使用以下代码检测并删除文档特定范围内的空行:

    Document doc = appointmentItem.GetInspector.WordEditor as Microsoft.Office.Interop.Word.Document;
    Bookmark bmkFound = doc.Bookmarks.get_Item("bmkToClean");
    Range bmkFound = bmkFound.Range;
    Find find = bmkFound.Find;
    find.Text = "\r";
    find.Replacement.Text = "";
    find.Execute();
    find.Text = "\r\n";
    find.Replacement.Text = "";
    find.Execute();
    find.Text = Convert.ToChar(13).ToString();
    find.Replacement.Text = "";
    find.Execute();
    find.Text = Convert.ToChar(10).ToString();
    find.Replacement.Text = "";
    find.Execute();

    lastChar.Text.Replace(Convert.ToChar(13), '');
    lastChar.Text.Replace(Convert.ToChar(10), '');
    lastChar.Text.Replace("\r", "");
    lastChar.Text.Replace("\n", "");

到目前为止没有任何结果。有什么提示吗?

好的,问题是我有几个空行,所以代码需要进行以下调整:

Document doc = appointmentItem.GetInspector.WordEditor as 
Microsoft.Office.Interop.Word.Document;
Bookmark bmkFound = doc.Bookmarks.get_Item("bmkToClean");
Range bmkFound = bmkFound.Range;
Find find = bmkFound.Find;
find.Text = "\r";
find.Replacement.Text = "";
find.Forward = true;
find.Wrap = Microsoft.Office.Interop.Word.WdFindWrap.wdFindContinue;
find.Replacement.Text = "";
find.Execute(Replace: WdReplace.wdReplaceAll);