Classe Cell (PowerPoint VBA)

La classe Cell représente une cellule de tableau. L'objet Cell est membre de la CellRange collection. La collection CellRange représente toutes les cellules dans la ligne ou la colonne spécifiée. Pour utiliser la collection CellRange, utilisez le mot clé Cells.

La procédure principale de la classe Cell est Select

Set

Pour utiliser une variable de classe Cell, elle doit d'abord être instanciée, par exemple

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

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe Cell : CellRange.Item, Table.Cell, Column.Cells et Row.Cells

Thèmes

Les procédures suivantes de cette classe ont été regroupées et sont décrites sur une page thématique séparée

Sort/Order with its procedures Borders et CellRange.Borders

Méthodes

C'est la méthode principale de la classe Cell

Select - Sélectionne l'objet spécifié.

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

Autre Méthodes

Split - Scinde une cellule de tableau en plusieurs cellules distinctes.

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

Propriétés

Parent Renvoie l’objet parent de l’objet spécifié.

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

Selected Cette propriété renvoie la valeur true si la cellule de tableau spécifiée est sélectionnée. En lecture seule.

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

Shape Renvoie un objet Shape qui représente une forme dans une cellule de tableau. En lecture seule.

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

CellRange.Count Renvoie le nombre d'objets de la collection spécifiée. En lecture seule.

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

CellRange.Parent Renvoie l’objet parent de l’objet spécifié.

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