Поиск всего красного текста в Word - PullRequest
Новая
       51

Поиск всего красного текста в Word

1 голос
/ 20 июня 2019

Я пытаюсь выяснить, как найти весь красный текст в словесном файле (а затем удалить его).Однако, похоже, я в тупике.Может ли кто-нибудь помочь мне встать на правильное направление?

Это то, что у меня пока есть: 

public Form1()
    {
        InitializeComponent();

        object missing = System.Reflection.Missing.Value;
        object readOnly = false;
        object isVisible = true;
        object fileName = "D:\\word.docx";

        Microsoft.Office.Interop.Word.Application application = new Microsoft.Office.Interop.Word.Application();
        Document document = application.Documents.Open(@"D:\word2.docx",missing,true,missing,missing,missing,missing,missing,missing,missing,missing,missing,missing,missing,missing,missing);

        FindAndReplace(application, "", "");
    }

    private void FindAndReplace(Microsoft.Office.Interop.Word.Application doc, object findText, object replaceWithText)
    {
        //options
        object matchCase = false;
        object matchWholeWord = true;
        object matchWildCards = false;
        object matchSoundsLike = false;
        object matchAllWordForms = false;
        object forward = true;
        object format = true;
        object matchKashida = false;
        object matchDiacritics = false;
        object matchAlefHamza = false;
        object matchControl = false;
        object read_only = false;
        object visible = true;
        object replace = 2;
        object wrap = 1;

        doc.Selection.Find.ClearFormatting();
        doc.Selection.Find.Replacement.ClearFormatting();
        doc.Selection.Find.Replacement.Font.ColorIndex = Microsoft.Office.Interop.Word.WdColorIndex.wdRed;

        //execute find and replace
        doc.Selection.Find.Execute(ref findText, ref matchCase, ref matchWholeWord,
            ref matchWildCards, ref matchSoundsLike, ref matchAllWordForms, ref forward, ref wrap, ref format, ref replaceWithText, ref replace,
            ref matchKashida, ref matchDiacritics, ref matchAlefHamza, ref matchControl);
    }

Когда я запускаю это, я получаю исключение COM, говорящее, что

команда недоступна.

...