Shape.Table 属性 (Publisher)

返回一个 Table 对象，该对象代表 Microsoft Publisher 中的表。

语法

表达式。表

表达 一个代表 Shape 对象的变量。

示例

以下示例将一个 5x5 表格添加到当前出版物的第一页上，然后选择新表格的第一列。

Sub NewTable() 
 With ActiveDocument.Pages(1).Shapes.AddTable(NumRows:=5, _ 
 NumColumns:=5, Left:=72, Top:=300, Width:=400, Height:=100) 
 .Table.Columns(3).Cells(3).Fill.ForeColor.RGB = RGB _ 
 (Red:=255, Green:=0, Blue:=0) 
 End With 
End Sub

以下示例选择当前出版物中的指定表格。 以下示例假定当前出版物的第一页上至少有一个形状。

Sub SelectTable() 
 With ActiveDocument.Pages(1).Shapes(1) 
 If .Type = pbTable Then 
 .Table.Rows(3).Cells(3).Fill.ForeColor _ 
 .RGB = RGB(Red:=150, Green:=150, Blue:=150) 
 End If 
 End With 
End Sub

支持和反馈

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