VBA Encadrement de cellules

Bonsoir au Forum,

J'ai une plage (1ligne x 5 col.) à encadrer contour épais médium , couleur du fond en vert.

à l' enregistrement çà donne 25 lignes d'instruction .

n'y a t-il pas une combine + directe.

merci d' avance.

à vous lire.......Claude.

je ne suis pas sur de comprendre, est-ce que tu fais tes encadrements dans du code vba?

re,

Math, non il s'agit d'une plage de cellule dans une feuille.

c'est à l'enregistrement macro que çà donne 25 lignes de code.

à+.....Claude.

Bonsoir,

sans voir le code que tu as fait, ce n'est pas facile.

Essaye en nommant ta plage ou en la définissant puis tu mets le code ci-après

With Sheets("nom de ta feuille").Range("nom de la plage")
    .BorderAround LineStyle:=xlDouble
    .Borders(xlInsideHorizontal).LineStyle = xlNone
    .Borders(xlInsideVertical).LineStyle = xlContinuous
End With

Amicalement

Dan

re,

merci Dan, mais ça va pas ; ton code encadre toutes les cellules de la plage,

alors que je voudrais encadrer seulement le contour de la plage.

à suivre.......Claude.

re,

ben tu gardes ...BorderAround LineStyle:=xlDouble

Dan

re,

OK, c'est bon.

encore merci.......Claude.