oTable=oWord.ActiveDocument.Tables.Add(oRange,2,9) oTable.Columns(1).PreferredWidthType= 2 && wdPreferredWidthPercent oTable.Columns(1).PreferredWidth=11 oTable.Columns(2).PreferredWidthType= 2 && wdPreferredWidthPercent oTable.Columns(2).PreferredWidth=11 oTable.Columns(3).PreferredWidthType= 2 && wdPreferredWidthPercent oTable.Columns(3).PreferredWidth=15 oTable.Columns(4).PreferredWidthType= 2 && wdPreferredWidthPercent oTable.Columns(4).PreferredWidth=15 oTable.Columns(5).PreferredWidthType= 2 && wdPreferredWidthPercent oTable.Columns(5).PreferredWidth=10 oTable.Columns(6).PreferredWidthType= 2 && wdPreferredWidthPercent oTable.Columns(6).PreferredWidth=10 oTable.Columns(7).PreferredWidthType= 2 && wdPreferredWidthPercent oTable.Columns(7).PreferredWidth=10 oTable.Columns(8).PreferredWidthType= 2 && wdPreferredWidthPercent oTable.Columns(8).PreferredWidth=10 oTable.Columns(9).PreferredWidthType= 2 && wdPreferredWidthPercent oTable.Columns(9).PreferredWidth=10