Partager via


Objet ConditionalStyle (Word)

Représente une mise en forme spéciale appliquée à des zones déterminées d'un tableau lorsque ce dernier est mis en forme d'après un style de tableau particulier.

Remarques

Utilisez la méthode Condition de l'objet TableStyle pour renvoyer un objet ConditionalStyle. La propriété de la trame de fond peut être utilisée pour appliquer un ombrage à certaines zones d'un tableau. Cet exemple montre comment sélectionne le premier tableau du document actif et applique la trame de fond aux colonnes et lignes de substitution. Cet exemple suppose qu'il existe un tableau dans le document actif et qu'elle est mise en forme à l'aide du style Table Grid.

Sub ApplyConditionalStyle() 
 With ActiveDocument 
 .Tables(1).Select 
 With .Styles("Table Grid").Table 
 .Condition(wdOddColumnBanding).Shading _ 
 .BackgroundPatternColor = wdColorGray10 
 .Condition(wdOddRowBanding).Shading _ 
 .BackgroundPatternColor = wdColorGray10 
 End With 
 End With 
End Sub

Utilisez la propriété Borders pour appliquer des bordures à certaines zones d'un tableau. Cet exemple montre comment sélectionne le premier tableau du document actif et applique des bordures à la première et la dernière ligne et la première colonne. Cet exemple suppose qu'il existe un tableau dans le document actif et qu'elle est mise en forme à l'aide du style Table Grid.

Sub ApplyTableBorders() 
 With ActiveDocument 
 .Tables(1).Select 
 With .Styles("Table Grid").Table 
 .Condition(wdFirstRow).Borders(wdBorderBottom) _ 
 .LineStyle = wdLineStyleDouble 
 .Condition(wdFirstColumn).Borders(wdBorderRight) _ 
 .LineStyle = wdLineStyleDouble 
 .Condition(wdLastRow).Borders(wdBorderTop) _ 
 .LineStyle = wdLineStyleDouble 
 End With 
 End With 
End Sub

Voir aussi

Référence du modèle objet Word

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.