Shapes.AddTable 方法 (Publisher)

将表示表的新 Shape 对象添加到指定的 Shapes 集合。

语法

表达式。AddTable (NumRows、 NumColumns、 Left、 Top、 Width、 Height、 FixedSize、 Direction)

expression：一个表示 Shapes 对象的变量。

参数

名称	必需/可选	数据类型	说明
NumRows	必需	Long	新表格的行数。 介于 1 和 128 之间的值有效;超出此范围的任何值都会生成错误。
NumColumns	必需	Long	新表格的列数。 介于 1 和 128 之间的值有效;超出此范围的任何值都会生成错误。
Left	必需	Variant	代表表格的形状的左边缘的位置。
Top	必需	Variant	代表表格的形状的上边缘的位置。
Width	必需	Variant	代表表格的形状的宽度。
Height	必需	Variant	代表表格的形状的高度。
FixedSize	可选	Boolean	如此 如果 Microsoft Publisher 可以减少的行数和列的表，以适应指定的宽度和高度。 假 如果发布服务器将自动增加的宽度和高度以适应行和表中的列数的表格框架。 默认值为 False 。
Direction	可选	PbTableDirectionType	表格列采用的编号方向。 默认值取决于当前语言设置。

返回值

Shape

说明

对于 Left、 Top、 Width 和 Height 参数，数值以 磅为单位计算：字符串可以位于 Publisher (支持的任何单元中，例如“2.5 in”) 。

Direction 参数可以是 Microsoft Publisher 类型库中声明的 PbTableDirectionType 常量之一，如下表所示。

常量	说明
pbTableDirectionLeftToRight	表格的列从左向右编号。 从左向右书写的语言的默认值。
pbTableDirectionRightToLeft	表格的列从右向左编号。 从右向左书写的语言的默认值。

示例

以下示例在当前出版物的第一页上新建一个表格。

Dim shpTable As Shape 
 
Set shpTable = ActiveDocument.Pages(1).Shapes.AddTable _ 
 (NumRows:=3, NumColumns:=4, _ 
 Left:=10, Top:=10, _ 
 Width:=288, Height:=216) 

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。