将范围内的文本转换为表格。 作为 表 对象返回的表。
语法
expression。 ConvertToTable( _Separator_ , _NumRows_ , _NumColumns_ , _InitialColumnWidth_ , _Format_ , _ApplyBorders_ , _ApplyShading_ , _ApplyFont_ , _ApplyColor_ , _ApplyHeadingRows_ , _ApplyLastRow_ , _ApplyFirstColumn_ , _ApplyLastColumn_ , _AutoFit_ , _AutoFitBehavior_ , _DefaultTableBehavior_ )
expression 一个表示 Range 对象的变量。
参数
| 名称 | 必需/可选 | 数据类型 | 说明 | 
|---|---|---|---|
| Separator | 可选 | Variant | 指定用于将文本分隔成单元格的字符。 可以是一个字符或以下的 WdTableFieldSeparator 常量之一。 如果省略此参数,则使用 DefaultTableSeparator 属性的值。 | 
| NumRows | 可选 | Variant | 表格中的行数。 如果省略此参数,Microsoft Word 将根据该范围的内容设置行数。 | 
| NumColumns | 可选 | Variant | 表格中的列数。 如果省略此参数,Word 将根据该范围的内容设置列数。 | 
| InitialColumnWidth | 可选 | Variant | 每一列的初始宽度,以磅为单位。 如果省略此参数,Word 将计算并调整列宽,以使表格填满页面。 | 
| Format | 可选 | Variant | 指定 表格自动套用格式对话框中列出的预定义格式之一。 可以是 WdTableFormat 常量之一。 | 
| ApplyBorders | 可选 | Variant | 则 应用指定格式的边框属性。 | 
| ApplyShading | 可选 | Variant | 则 应用指定格式的底纹属性。 | 
| ApplyFont | 可选 | Variant | 则 应用指定格式的字体属性。 | 
| ApplyColor | 可选 | Variant | 则 应用指定格式的颜色属性。 | 
| ApplyHeadingRows | 可选 | Variant | 则 应用指定格式的标题行的属性。 | 
| ApplyLastRow | 可选 | Variant | 则 应用指定格式的最后一行的属性。 | 
| ApplyFirstColumn | 可选 | Variant | 则 应用指定格式的第一列的属性。 | 
| ApplyLastColumn | 可选 | Variant | 则 应用指定格式的最后一列的属性。 | 
| AutoFit | 可选 | Variant | 真 要减少尽最大可能的表格列的宽度,而无需更改文字换行的单元格中。 | 
| AutoFitBehavior | 可选 | Variant | 设置 Word 调整表格的大小的自动调整规则。 可以是下列的 WdAutoFitBehavior 常量之一。 如果 DefaultTableBehavior 是 wdWord8TableBehavior ,则忽略此参数。 | 
| DefaultTableBehavior | 可选 | Variant | 设置一个值,指定是否 Microsoft Word 会自动调整大小以适合内容 (自动调整) 表中的单元格。 可以是一个 WdDefaultTableBehavior 常量。 | 
返回值
表格
示例
以下示例将活动文档的前三段转换为一个表格。
Set aDoc = ActiveDocument 
Set myRange = aDoc.Range(Start:=aDoc.Paragraphs(1).Range.Start, _ 
 End:=aDoc.Paragraphs(3).Range.End) 
myRange.ConvertToTable Separator:=wdSeparateByParagraphs
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。