将区域或选定内容中的文本转换为表格。将表格作为 Table 对象返回。
expression.ConvertToTable(Separator, NumRows, NumColumns, InitialColumnWidth, Format, ApplyBorders, ApplyShading, ApplyFont, ApplyColor, ApplyHeadingRows, ApplyLastRow, ApplyFirstColumn, ApplyLastColumn, AutoFit, AutoFitBehavior, DefaultTableBehavior)
expression 必需。该表达式返回一个 Range 或 Selection 对象。
Separator Variant 类型,可选。指定用于将文本分隔为单元格的字符。其值可以是一个字符,也可以是下列 WdTableFieldSeparator 常量之一。若省略此参数,将使用 DefaultTableSeparator 属性的值。
WdTableFieldSeparator 可以是下列 WdTableFieldSeparator 常量之一: |
wdSeparateByCommas |
wdSeparateByDefaultListSeparator |
wdSeparateByParagraphs |
wdSeparateByTabs |
NumRows Variant 类型,可选。指表格的行数。如省略此参数,Microsoft Word 将根据该区域或所选区域的内容设置行数。
NumColumns Variant 类型,可选。表格的列数。如省略此参数,Word 将根据该区域或所选区域的内容设置列数。
InitialColumnWidth Variant 类型,可选。设置初始列宽,以磅为单位。若省略此参数,Word 将计算并调整列宽,使表格填满页面。
Format Variant 类型,可选。指定“表格”菜单的“表格自动套用格式”对话框中列出的预定义格式中的一种。可取下列 WdTableFormat 常量之一。
可取下列 WdTableFormat 常量之一: |
wdTableFormat3DEffects1 |
wdTableFormat3DEffects2 |
wdTableFormat3DEffects3 |
wdTableFormatClassic1 |
wdTableFormatClassic2 |
wdTableFormatClassic3 |
wdTableFormatClassic4 |
wdTableFormatColorful1 |
wdTableFormatColorful2 |
wdTableFormatColorful3 |
wdTableFormatColumns1 |
wdTableFormatColumns2 |
wdTableFormatColumns3 |
wdTableFormatColumns4 |
wdTableFormatColumns5 |
wdTableFormatContemporary |
wdTableFormatElegant |
wdTableFormatGrid1 |
wdTableFormatGrid2 |
wdTableFormatGrid3 |
wdTableFormatGrid4 |
wdTableFormatGrid5 |
wdTableFormatGrid6 |
wdTableFormatGrid7 |
wdTableFormatGrid8 |
wdTableFormatList1 |
wdTableFormatList2 |
wdTableFormatList3 |
wdTableFormatList4 |
wdTableFormatList5 |
wdTableFormatList6 |
wdTableFormatList7 |
wdTableFormatList8 |
wdTableFormatNone |
wdTableFormatProfessional |
wdTableFormatSimple1 |
wdTableFormatSimple2 |
wdTableFormatSimple3 |
wdTableFormatSubtle1 |
wdTableFormatSubtle2 |
wdTableFormatWeb1 |
wdTableFormatWeb2 |
wdTableFormatWeb3 |
ApplyBorders Variant 类型,可选。如果为 True,则应用指定格式的边框属性。
ApplyShading Variant 类型,可选。如果为 True,则应用指定格式的底纹属性。
ApplyFont Variant 类型,可选。如果为 True,则应用指定格式的字体属性。
ApplyColor Variant 类型,可选。如果为 True,则应用指定格式的颜色属性。
ApplyHeadingRows Variant 类型,可选。如果为 True,则应用指定格式的标题行属性。
ApplyLastRow Variant 类型,可选。如果为 True,则应用指定格式的最后一行的属性。
ApplyFirstColumn Variant 类型,可选。如果为 True,则应用指定格式的第一列的属性。
ApplyLastColumn Variant 类型,可选。如果为 True,则应用指定格式的最后一列的属性。
AutoFit Variant 类型,可选。如果为 True,则在不改变单元格内文字换行的前提下尽可能缩小表格列宽。
AutoFitBehavior Variant 类型,可选。设置 Word 调整表格的“自动调整”规则。可取下列 WdAutoFitBehavior 常量之一。如果 DefaultTableBehavior 为 wdWord8TableBehavior,则此参数被忽略。
WdAutoFitBehavior 可以是下列 WdAutoFitBehavior 常量之一: |
wdAutoFitContent |
wdAutoFitFixed |
wdAutoFitWindow |
DefaultTableBehavior Variant 类型,可选。设定一个值以指定 Microsoft Word 是否可以根据单元格中内容的多少自动改变表格中单元格的大小(“自动调整”)。可取下列 WdDefaultTableBehavior 常量之一。
WdDefaultTableBehavior 可以是下列 WdDefaultTableBehavior 常量之一: |
wdWord8TableBehavior 禁用“自动调整”,默认值。 |
wdWord9TableBehavior 启用“自动调整”。 |
本示例将活动文档的前三段转换为表格。
Set aDoc = ActiveDocument
Set myRange = aDoc.Range(Start:=aDoc.Paragraphs(1).Range.Start, _
End:=aDoc.Paragraphs(3).Range.End)
myRange.ConvertToTable Separator:=wdSeparateByParagraphs
本示例在插入点插入文本,并将用逗号分隔的文本转换为带格式的表格。
With Selection
.Collapse
.InsertBefore "one, two, three"
.InsertParagraphAfter
.InsertAfter "one, two, three"
.InsertParagraphAfter
End With
Set myTable = _
Selection.ConvertToTable(Separator:=wdSeparateByCommas, _
Format:=wdTableFormatList8)