VBA - Bordures en X par double clics et inversément

Bonjour,

Je recherche un code VBA pour pouvoir changer la bordure (en croix avec le cadre extérieur) d'une cellule par double clics et inversément tout en laissant le texte de cette cellule.

Pouvez-vous m'aider?

Mes meilleures salutations,

Thierry

Bonjour,

A tester :

les 4 borders top, left right et bottom, on peut les prendre ensemble comme "borders", comme vous l'avez fait juste en dessous.

With .Borders
  .LineStyle = xlContinuous
  .Weight = xlThin
End With

Bonjour à vous deux,

Merci pour vos proposition qui fonctionnent parfaitement bien.

Bon appétit et bon week-end !

Thierry