NestingLevel Property

Microsoft Word Visual Basic

expression.NestingLevel

expression    Required. An expression that returns one of the objects in the Applies To list.

Remarks

The outermost table has a nesting level of 1. The nesting level of each successively nested table is one higher than the previous table.

Example

This example creates a new document, creates a nested table with three levels, and then fills the first cell of each table with its nesting level.

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
    End With
End With