Свойство Range.TopLevelTables (Word)

Возвращает коллекцию Tables , представляющую таблицы на самом внешнем уровне вложенного в текущем диапазоне. Только для чтения.

Синтаксис

выражение. TopLevelTables

выражение: переменная, представляющая объект Range.

Замечания

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

Сведения о возврате одного члена коллекции см. в разделе Возвращение объекта из коллекции.

Пример

В этом примере создается новый документ, вложенная таблица с тремя уровнями, а затем первая ячейка каждой таблицы заполняется уровнем вложенности. В этом примере выбирается второй столбец таблицы второго уровня, а затем выбирается первая из таблиц верхнего уровня в этом фрагменте. Выбрана самая внутренняя таблица, даже если она не является таблицей верхнего уровня в контексте всего набора вложенных таблиц.

Documents.Add 
ActiveDocument.Tables.Add Selection.Range, _ 
 3, 3, wdWord9TableBehavior, wdAutoFitContent 
With ActiveDocument.Tables(1).Range 
 .Copy 
 .Cells(1).Range.Text = .Cells(1).NestingLevel 
 .Cells(5).Range.PasteAsNestedTable 
 With .Cells(5).Tables(1).Range 
 .Cells(1).Range.Text = .Cells(1).NestingLevel 
 .Cells(5).Range.PasteAsNestedTable 
 With .Cells(5).Tables(1).Range 
 .Cells(1).Range.Text = _ 
 .Cells(1).NestingLevel 
 End With 
 .Columns(2).Select 
 Selection.Range.TopLevelTables(1).Select 
 End With 
End With

См. также

Объект Range

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.