Propriété Shape.Table (Publisher)

Renvoie un objet Table qui représente une table dans Microsoft Publisher.

Syntaxe

expression. Table

expression Une variable qui représente uneForme d’objet.

Exemple

L'exemple suivant ajoute un tableau 5x5 sur la première page de la composition active, puis sélectionne la première colonne de ce nouveau tableau.

Sub NewTable() 
 With ActiveDocument.Pages(1).Shapes.AddTable(NumRows:=5, _ 
 NumColumns:=5, Left:=72, Top:=300, Width:=400, Height:=100) 
 .Table.Columns(3).Cells(3).Fill.ForeColor.RGB = RGB _ 
 (Red:=255, Green:=0, Blue:=0) 
 End With 
End Sub

L'exemple suivant sélectionne le tableau spécifié dans la composition active. Cet exemple suppose qu'il y ait au moins une forme sur la première page de la composition active.

Sub SelectTable() 
 With ActiveDocument.Pages(1).Shapes(1) 
 If .Type = pbTable Then 
 .Table.Rows(3).Cells(3).Fill.ForeColor _ 
 .RGB = RGB(Red:=150, Green:=150, Blue:=150) 
 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.