Formatting Nested Tables

Guessed · #2 01-16-2020, 02:57 PM

Word does consider nested tables to be tables, the problem is just that the nested tables are contained inside other tables. For instance, to get to the first level of nesting

Code:

Sub TestTables()
  Dim aTbl As Table, aTblN As Table
  For Each aTbl In ActiveDocument.Tables
    Debug.Print aTbl.NestingLevel
    For Each aTblN In aTbl.Tables
      Debug.Print aTbl.NestingLevel, aTblN.NestingLevel
    Next aTblN
  Next aTbl
End Sub

The next trick is to come up with a recursive function so that you can drill into deeper nesting levels. This thread vba - Find/Count all tables in the document's body (including all nested tables of all levels) - Stack Overflow has more inspiration for you.

Thread Tools
Show Printable Version Email this Page
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
How to compile text from multiple tables into a cell in a nested table	jrooney7	Word VBA	2	03-11-2019 07:55 AM
Removing KeepWithNext Formatting from Nested Tables?	Jfedora	Word VBA	3	06-06-2017 11:49 AM
Nested tables. Count rows	NevilleT	Word VBA	9	05-10-2017 05:22 AM
Formatting all tables	knightmetal	Word	2	09-10-2012 10:53 PM
Nested vlookup with varable tables!	Dave Jones	Excel	0	08-30-2012 09:15 AM