Column Widths

Set oTable = ActiveDocument.Tables.Add(Range:=oRange, _ 
                                       NumRows:=1, _ 
                                       NumColumns:=2, _ 
                                       DefaultTableBehavior:=WdDefaultTableBehavior.wdWord8TableBehavior, _ 
                                       AutoFitBehavior:=WdAutoFitBehavior.wdAutoFitWindow) 
            
oTable.PreferredWidthType = wdPreferredWidthPoints 
oTable.Cell(1, 1).Width = Application.CentimetersToPoints(3) 
oTable.Cell(1, 2).Width = Application.CentimetersToPoints(13.5)