Selection.TopLevelTables (Word)
Devuelve una colección tables que representa las tablas del nivel de anidamiento más externo de la selección actual.
Este método devuelve una colección que contiene sólo las tablas de nivel de anidamiento más externo dentro del contexto de la selección actual. Para obtener información sobre cómo devolver un solo miembro de una colección, vea devolver un objeto de una colección.
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.TopLevelTables(1).Select
End With
End With