Classe Border - bordure (Excel VBA)

Cet objet représente la bordure d'un objet.

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

Dim brd as Border
Set brd = ActiveCell.BorderAround()

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe Border : Axis.Border, Borders.Item, DataTable.Border, DropLines.Border, ErrorBars.Border, Gridlines.Border, HiLoLines.Border, LeaderLines.Border, OLEObject.Border, OLEObjects.Border, Range.BorderAround, SeriesLines.Border et Trendline.Border.

For Each

Voici un exemple de traitement des éléments Border dans une collection

Dim brd As Border
For Each brd In Application.Borders
	
Next brd

Color

Cette propriété renvoie ou définit la couleur principale de l'objet, comme l'indique la section des remarques dans le tableau suivant. Utilisez la fonction RGB pour créer une valeur de couleur. Variant en lecture/écriture.

ActiveCell.BorderAround.Color = RGB(0,0,255)'blue

ColorIndex

Cette propriété renvoie ou définit une valeur de type Variant qui représente la couleur de la bordure. Les valeurs de retour possibles sont xlColorIndexAutomatic - Couleur automatique, xlColorIndexNone - Aucune couleur.

La couleur est spécifiée sous la forme d'une valeur d'index dans la palette de couleurs en cours, ou comme une des constantes XlColorIndex : xlColorIndexAutomatic ou xlColorIndexNone.

ActiveCell.BorderAround.ColorIndex = xlColorIndexAutomatic

LineStyle

Renvoie ou définit le style de ligne de la bordure. En lecture/écriture XlLineStyle, xlGray25, xlGray50, xlGray75ou xlAutomatic. Les valeurs de retour possibles sont xlContinuous - Trait continu, xlDash - En pointillés, xlDashDot - Alternance de tirets et de points, xlDashDotDot - Tiret suivi de deux points, xlDot - Trait avec points, xlDouble - Double trait, xlLineStyleNone - Aucun trait, xlSlantDashDot - Tirets inclinés.

xlDouble et xlSlantDashDot ne s'appliquent pas aux graphiques.

ActiveCell.BorderAround.LineStyle = xlContinuous

ThemeColor

Renvoie ou définit la couleur du thème dans le jeu de couleurs appliquées qui est associé à l’objet spécifié. Variant en lecture/écriture.

Toute tentative d'accès à une couleur de thème pour un objet auquel aucun thème n'est appliqué provoquera une erreur de requête non valide à l'exécution.

ActiveCell.BorderAround.ThemeColor =

TintAndShade

Renvoie ou définit un Single qui éclaircit ou assombrit une couleur.

Vous pouvez entrer un nombre compris entre -1 (zones les plus sombres) et 1 (plus claires) pour la propriétéTintAndShade. Zéro (0) est neutre. Toute tentative de définition de cette propriété sur une valeur inférieure à-1 ou supérieure à 1 génère cette erreur d'exécution: «la valeur spécifiée est en dehors des limites». Cette propriété fonctionne pour les couleurs de thème et les couleurs hors thème.

ActiveCell.BorderAround.TintAndShade =

Weight

Cette propriété renvoie ou définit une valeur XlBorderWeight qui représente l'épaisseur de la bordure. Les valeurs de retour possibles sont xlHairline - Très fin (bordure la plus fine), xlMedium - Moyenne, xlThick - Épais (bordure la plus large), xlThin - Couche.

ActiveCell.BorderAround.Weight = xlMedium