Partager via


Selection.TableCellRange, propriété (Publisher)

Renvoie un objet CellRange qui représente les cellules d’une sélection de tableau.

Syntaxe

expression. TableCellRange

expression Variable qui représente un objet Selection .

Valeur renvoyée

CellRange

Exemple

Cet exemple remplit les cellules de tableau d’une sélection.

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

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.