Encadrement VBA

[ALEA()]

Bonjour,

J'ai une ligne de commande qui colorie en bleu 6 cellules:
If Not ab Is Nothing Then
ab.Interior.Color = vbBlue

Je voudrais ajouter l'encadrement (pas le quadrillage) de ces cellules, pouvez-vous me donner la syntaxe?

Merci

 

[Lone-wolf]

Bonjour ALEA()

ab.BorderAround xlContinuous, xlMedium, xlColorIndexAutomatic . Si bordure en couleur

ab.BorderAround xlContinuous, xlMedium, 3