Range.TopLevelTables (Word)

Devuelve una colección tables que representa las tablas del nivel de anidamiento más exterior en el intervalo actual.

Este método devuelve una colección que contiene sólo las tablas de nivel de anidamiento más externo dentro del contexto del intervalo 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.Range.TopLevelTables(1).Select 
 End With 
End With