Selection.TableCellRange 属性 (Publisher)

返回一个 CellRange 对象，该对象代表表格选择中的单元格。

语法

表达式。TableCellRange

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

返回值

CellRange

示例

以下示例填充选定内容中的表格单元格。

Sub FillTableCellRange() 
 Dim intCount As Integer 
 With Selection 
 If .Type = pbSelectionTableCells Then 
 With .TableCellRange 
 For intCount = 1 To .Count 
 .Item(intCount).Fill.ForeColor.RGB = RGB _ 
 (Red:=0, Green:=255, Blue:=255) 
 Next intCount 
 End With 
 End If 
 End With 
End Sub

支持和反馈

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