Objet CellRange (PowerPoint)

Une collection de cellule objets d'une colonne de table ou de la ligne. 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.

Remarques

Bien que l’objet soit appelé CellRange et qu’il soit affiché dans l’Explorateur d’objets, ce mot clé n’est pas utilisé pour la programmation du modèle objet PowerPoint. C'est le mot clé Cells qui est utilisé à la place.

Vous ne pouvez pas ajouter ni supprimer de cellules dans un tableau PowerPoint par programme. Utilisez la méthode AddTable avec l’objet Table pour ajouter un tableau. Utilisez Ajouter méthode des colonnes ou les lignes collections pour ajouter une colonne ou une ligne à une table. Utilisez la méthode Delete de la collection Columns ou Rows pour supprimer une colonne ou une ligne d’un tableau.

Exemple

Utilisez la propriété Cells pour renvoyer la collection CellRange. Cet exemple montre comment définir pour la bordure droite des cellules de la première colonne du tableau le style ligne pointillée.

With ActivePresentation.Slides(2).Shapes(5).Table.Columns(1).Cells

    .Borders(ppBorderRight).DashStyle = msoLineDash

End With

Cet exemple montre comment renvoyer le numéro des cellules de la première ligne du tableau sélectionné.

num = ActiveWindow.Selection.ShapeRange.Table.Rows(1).Cells.Count

Utilisez Cellule (ligne, colonne), où row est le numéro de ligne et column est le numéro de colonne, ou Cells (index), où index est le numéro de la cellule dans la ligne ou colonne spécifiée, pour renvoyer un objet Cell unique. Les cellules sont numérotées de gauche à droite dans les lignes et de haut en bas dans les colonnes. Pour les langues qui utilisent une écriture de droite à gauche, cet ordre de numérotation est inversé. L’exemple suivant montre comment fusionner les deux premières cellules de la première ligne du tableau figurant dans la cinquième forme de la deuxième diapositive.

With ActivePresentation.Slides(2).Shapes(5).Table

    .Cell(1, 1).Merge MergeTo:=.Cell(1, 2)

End With

Voir aussi

Référence du modèle objet PowerPoint

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.