Clase Cell (PowerPoint VBA)

La clase Cell representa una celda de tabla. El objeto Cell es un miembro de la CellRange colección. La colección CellRange representa todas las celdas de la columna o fila especificada. Para utilizar la colección CellRange, use la palabra clave Cells.

El principal procedimiento de la clase Cell es Select

Set

Para usar una variable de clase Cell, primero debe ser instanciado, por ejemplo

Dim cll as Cell
Set cll = Dim lngRow As Long: lngRow = 
Dim lngColumn As Long: lngColumn = 
ActiveWindow.RangeFromPoint.Table.Cell(Row:=lngRow, Column:=lngColumn)

Los siguientes procedimientos se pueden usar para establecer variables de clase Cell : CellRange.Item, Table.Cell, Column.Cells y Row.Cells

Temas

Los siguientes procedimientos de esta clase se han agrupado y se describen en una página temática separada

Sort/Order with its procedures Borders y CellRange.Borders

Métodos

Este es el método principal de la clase Cell

Select - Selecciona el objeto especificado.

ActivePresentation.Slides(1).Shapes(2).Table.Cell.Select

Otros Métodos

Split - Divide una celda de tabla en varias celdas.

Dim lngNumRows As Long: lngNumRows = 
Dim lngNumColumns As Long: lngNumColumns = 
ActivePresentation.Slides(1).Shapes(2).Table.Cell(1,1).Split NumRows:=lngNumRows, NumColumns:=lngNumColumns

Propiedades

Parent Devuelve el objeto primario del objeto especificado.

Dim objParent As Object
Set objParent = ActiveWindow.RangeFromPoint.Table.Cell.Parent

Selected Devuelve true si se selecciona la celda de tabla especificada. Solo lectura.

Dim booSelected As Boolean
booSelected = ActivePresentation.Slides(1).Shapes(2).Table.Cell.Selected

Shape Devuelve un objeto Shape que representa una forma en una celda de tabla. Solo lectura.

Dim shpShape As Shape
Set shpShape = ActivePresentation.Slides(1).Shapes(2).Table.Cell.Shape

CellRange.Count Devuelve el número de objetos de la colección especificada. Solo lectura.

Dim lngCount As Long
lngCount = ActivePresentation.Slides(1).Shapes(2).Table.Rows(1).Cells.Count

CellRange.Parent Devuelve el objeto primario del objeto especificado.

Dim objParent As Object
Set objParent = ActiveWindow.RangeFromPoint.Table.Rows(1).Cells.Parent