XL 2010 vba pour créer une bordure

steph_29120

XLDnaute Junior
Bonjour à tous,

Je souhaite créer un vba pour appliquer une bordure à une plage (qui n'a pas toujours la même grandeur).

Je sélectionne la plage concernée et je lancerai la vba pour faire un encadrement des contours en bleu foncé.

merci d'avance
 

Cousinhub

XLDnaute Barbatruc
Bonjour,
Lorsque Excel est ouvert, tu as un bouton "magique" :
1687434646774.png

C'est le petit bouton, en bas, qui ressemble à une machine à laver...
Quand tu appuies dessus, tu démarres l'enregistrement d'une macro..
Donc :
1- Sélection de la plage (en premier...)
2 - appui sur le bouton
3 - Faire ce qu'il y a à faire (Mise en forme..)
4 - Ré-appui sur ce bouton pour arrêter l'enregistrement (N'oublie pas cette étape, surtout)
Ton code va alors être généré, et prêt à l'emploi

Bon courage
 

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonjour Steph, Cousinhub,
Un essai en PJ. La bordure se met en bleu autour de la sélection par simple appui sur la touche "²" ( qui ne sert que rarement.)
Avec dans ThisWorkbook :
VB:
Sub Workbook_Open()
    ' Lance la macro Bordure sur appui sur la touche "²"
     Application.OnKey "²", "Bordure"
End Sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    ' Remet en état la touche "²" en quittant
     Application.OnKey "²"
End Sub
qui lance la macro :
Code:
Sub Bordure()
    Selection.BorderAround Color:=vbBlue, Weight:=xlMedium
End Sub
 

Pièces jointes

  • Bordures.xlsm
    15.1 KB · Affichages: 4
Dernière édition:

patricktoulon

XLDnaute Barbatruc
Bonjour à tous
juste en passant
l'idée de @sylvanu est presque bonne
sauf que je rappelle au passage que les macros peuvent être targuées d'un raccourci clavier
parti de là donc inutile de détourner une touche quelle qu’elle soit

on fait comme ça
on peut même mettre des indication dans la description (voir après que j'ai fermé la fentre des options )
demo.gif
 

Discussions similaires

Statistiques des forums

Discussions
312 215
Messages
2 086 330
Membres
103 187
dernier inscrit
ebenhamel