problems adding botton to a menu bar

[filo666]

Hello, I created an add in with a userform, I want to create a button that
opens the userform when clicked, in order to doing so I have until now in my
add in workbook:

Private Sub Workbook_AddinInstall()
Application.CommandBars("Formatting").Controls.Add
Type:=msoControlButton,
ID:=2950, Before:=13
End Sub

but I do not know how to assign the macro to the button; the macro writen in
the add in does not appear in the macro dialog box.

thanks

 

[Bob Phillips]

Private Sub Workbook_AddinInstall()
With Application.CommandBars("Formatting").Controls.Add( _
Type:=msoControlButton, ID:=2950, Before:=13)

.OnAction = "Test"
End With
End Sub

 

[filo666]

Thnaks, It worked perfectly;

other question,
How to add a different image to the macro button??
How to change the button description?

 

[Mike Fogleman]

..Caption = "Description"
..FaceID = the ID number of an image

Mike F