Таблица в Word документ, ConvertToText VB NET

Question

Я пытался найти ответ на этот вопрос, но, похоже, все хотят сделать обратное!

Использование кода VB.NET Я хочу преобразовать все таблицы в документе с открытым словом в текст, но при запуске следующего кода я получаю сообщение об ошибке

"'Microsoft.Office.Interop.Word.Table ». Эта операция завершилась неудачно, поскольку произошел сбой вызова QueryInterface для компонента COM для интерфейса с IID« {00020951-0000-0000-C000-000000000046} »из-за следующей ошибки: такой интерфейс не поддерживается (Исключение из HRESULT: 0x80004002 (E_NOINTERFACE)). '

Я неправильно понял код или это невозможно? Я предполагаю, что я ошибся!

Dim objTable As Table = objDoc.Tables

If objTable.Rows.Count = 1 Or objTable.Columns.Count = 1 Then
    objTable.ConvertToText(Separator:=vbCr)
End If

Answer 1

Как указано в комментарии, в коллекции Tables нет метода преобразования таблиц в текст, он есть только у объекта Table (в единственном числе).Это означает, что необходимо выполнять итерацию (цикл) элементов в коллекции.Например:

Dim objTables as Tables = objDoc.Tables
Dim objTable As Table
For each objTable in objTables
    If objTable.Rows.Count = 1 Or objTable.Columns.Count = 1 Then
        objTable.ConvertToText(Separator:=vbCr)
    End If
Next