Propiedad Selection.TableCellRange (Publisher)

Devuelve un objeto CellRange que representa las celdas de una selección de tabla.

Sintaxis

expresión. TableCellRange

expresión Variable que representa un objeto Selection .

Valor devuelto

CellRange

Ejemplo

En este ejemplo se rellenan las celdas de tabla de una selección.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.