How do I create a single table (called TableA, for example) with a varying number of column assigned to different rows ?

For example, row 1 has one column;
row 2 has two coumns;
row 3 has one column.

I tried using Set ObjectCol.Add , but it just creates a 3X2 table.



Thanks !

You need to make a normal table first, then merge cells to make the structure you want.

Code:

Dim oTbl As Table
Set oTbl = ActiveDocument.Tables.Add(Range:=Selection.Range, NumRows:=3, NumColumns:= _
      2, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _
      wdAutoFitFixed)
      
oTbl.Rows(1).Cells.Merge
oTbl.Rows(3).Cells.Merge