Add commandbutton on any excel sheets

[Doflamingo]

Hi all,

Does anybody know how to add a commandbutton on any existing excel sheet ?

Imagine I have a commandbutton with that code

Sub auto_open()
  F_Onglets.Show
End Sub

How to see this command button on any excel sheet, already existing and the new ones created ?

 

[igold]

This would add a button that will run your code "auto_open" to the activesheet. You can change the name, size, placement, text, color, etc, as you see fit...

Sub AddButton()


    ActiveSheet.Buttons.Add(600, 30, 120, 30).Select
    With Selection
        .Name = "CommandButton"
        .OnAction = "auto_open"
        .Characters.Text = "Show F_Onglets"
        .Font.Color = RGB(0, 100, 200)
        .Font.Size = 16
    End With
    
End Sub

 

[Doflamingo]

Hi @igold

Many thanks for your reply. Indeed it makes appear a commandbutton on the active sheet.

But I changed my mind and I finally decided to personalize the ribbon to make appears easily the macros the most used on the active sheet.

Many thanks for your time and your help

Kind regards

 

[igold]

Whatever works for you is the right thing. I was happy to help. Thanks for the feedback.