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()
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. Ici on trouve valeurs possible pour
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