Как определить таблицу Word с (по горизонтали) объединенными ячейками?

Question

Если таблица Word содержит объединенные по горизонтали ячейки, доступ к aTable.Columns.First или выполнение команды For Each over aTable.Columns приведет к ошибке.

Есть ли способ определить, содержит ли таблица горизонтально объединенные ячейки, не приводя к ошибке?

Я прочитал Определите, объединена ли ячейка Word , но речь идет о том, чтобы определить, объединена ли конкретная ячейка таблицы Word, а не объединена ли вся таблица.

Answer 1

Найдена ссылка в этой статье на свойство Uniform объекта Table, которое будет возвращать значение false, если таблица объединяет или разбивает ячейки.

Хотя это не означает, что ячейки объединены по горизонтали или вертикали (или оба), но это начало, и свойство отвечает на мой вопрос.

Answer 2

Да, это там.Вот логическое объяснение того, как вы будете обнаруживать вертикально слитые ячейки.Горизонтально объединенная ячейка также может обнаруживать, но для этого потребуется еще немного кодирования.

            But, unfortunately, not by calling any WORD VBA method or accessing any property of cell or table. It's by applying successive steps.

            Step1:
            -> Detect Row Count and Column Count of the table

            Step2:
            -> Declare an string array with same dimension as table( Dim A$()). Fill each cell of the array with "<m>" string.

            Step3:
            -> Start from cell(1)
            -> Then move cell by cell(Cell.Next method)
            -> Get each cells RowIndex and ColumnIndex.
            -> Erase the content "<m>" from the array, referenced by this RowIndex and ColumnIndex(A(RowIndex,ColumnIndex)=""
            -> Repeat this step until Cell.Next ends.

            Step4:
            -> Now check each cell of the Array(A$()). Those cells have the"<m>" string, are merged. Merged with immediate top cell. 

            I've not placed any function or code block. Assume it'll be more easy.

            Thanks

            Shubhayan