• Initiateur de la discussion Initiateur de la discussion Tial
  • 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 !

T

Tial

Guest
Bonjour à toutes et tous.

J'ai une BO personnaliseé. Dans cette dernière, comment puis je ajouter
un bouton qui actionnerait ma macro "toto".

Par avance merci


Sub CreateBO()
'Création de la barre d'outils "Forme Libre"
With Application
.ScreenUpdating = False
.CommandBars.Add(Name:="Forme libre").Visible = True
.CommandBars("Forme libre").Controls.Add Type:=msoControlButton, Id:=21, Before:=1
.CommandBars("Forme libre").Controls.Add Type:=msoControlButton, Id:=22, Before:=2
.CommandBars("Forme libre").Controls.Add Type:=msoControlButton, Id:=206, Before:=1
.CommandBars("Forme libre").Controls.Add Type:=msoControlButton, Id:=200, Before:=1
End With
ActiveSheet.Shapes.AddShape(msoShapeRectangle, 1, 1, 1, 1). _
Select
With Selection.ShapeRange
.Fill.Visible = msoFalse
.Line.Weight = 0.5
.Line.ForeColor.SchemeColor = 48
.SetShapesDefaultProperties
End With
Selection.Delete
End Sub
 
Salut Tial
re le FORUM

je pense (si j'ai bien compris la question)qu'il te suffit dans le menu personnalisation de faire Macro de prendre le bouton de le glisser dans ta barre puis clic droit sur le bouton affecter une macro et selectionner toto
A+++
Jean Marie
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
0
Affichages
2 K
Retour