Range.ConvertToTable 方法 (Word)
将范围内的文本转换为表格。 作为 表 对象返回的表。
语法
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 支持和反馈,获取有关如何接收支持和提供反馈的指南。