Bouton dans barre d'outils d'accés rapide

  • Initiateur de la discussion Initiateur de la discussion Hugues
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Hugues

XLDnaute Impliqué
Bonjour,

Je souhaiterais créer un bouton dans la barre d'outils d'accès rapide permettant de créer une flèche à l'endroit ou je me trouve dans la feuille de calcul.
En effet je souhaiterais ne plus passer par le menu insertion/formes/flèche.

quel code faut-il utiliser ?

Merci par avance,

Cordialement,

Hugues
 
Re : Bouton dans barre d'outils d'accés rapide

Bonjour,

utilise l'enregistreur de macro, te donnera le code, restera plus qu'à l'optimiser, choisis de l'enregistrer dans le classeur de macros personnelles, te permettra ensuite de l'utiliser dans tous tes classeurs...

bonne journée
@+
 
Re : Bouton dans barre d'outils d'accés rapide

Bonjour Pierrot
J'ai encore un souci avec le code.
Je souhaiterais que la flèche s'inscrive dans la cellule qui est active.
Comment faire pour déterminer l'emplacement ?

Sub Macro1()
'
' Macro1 Macro
'

'
ActiveSheet.Shapes.AddConnector(msoConnectorStraight, 249, 92.25, 315, 92.25). _
Select
Selection.ShapeRange.Line.EndArrowheadStyle = msoArrowheadOpen
With Selection.ShapeRange.Line
.Visible = msoTrue
.ForeColor.RGB = RGB(255, 0, 0)
.Transparency = 0
End With
With Selection.ShapeRange.Line
.Visible = msoTrue
.Weight = 3
End With

End Sub


Merci par avance,

Cordialement

Hugues
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour