VBA: Couleur des bordures

[apdf1]

Bonjour,

Je viens de voir le code VBA de Job75 sur les bordures qui m'intéresse.
Pour répondre a ma recherche, je voudrais si possible d'ajouter l'épaisseur de ligne et la couleur?

Private Sub Worksheet_Change(ByVal Target As Range)
Set Target = Intersect(Target, [A:A])
On Error Resume Next
Intersect(Target.SpecialCells(xlCellTypeBlanks).EntireRow, [A:H]).Borders.LineStyle = xlNone
Intersect(Target.SpecialCells(xlCellTypeConstants).EntireRow, [A:H]).Borders.Weight = xlThin
End Sub

Merci pour votre aide et je vous souhaite une bonne journée a tous.

Cordialement
Max

 

[Pierrot93]

Re : VBA: Couleur des bordures

Bonjour Max

l'épaisseur c'est la propriété "Weight" de l'objet "border", pour la couleur voir les propriétés "color" et "colorindex" de ce même objet... A noter si tu utilises l'enregistreur de macro, tu auras déjà des pistes...


bonne journée
@+

 

[apdf1]

Re : VBA: Couleur des bordures

Bonjour Pierrot,

Et merci je vais essayé de mettre ton explication en pratique.

Bonne journée

Max