You can create toolbars 'on-the-fly' in VBA. Something like this should get you going. It's copied directly from a simple add-in I wrote:-
Code:
Private Sub Workbook_Open()
'Attempt to delete any menu just in case Excel was
'closed down improperly or crashed.
Dim Con As CommandBarControl, ConPop As CommandBarPopup
Dim ComBut As CommandBarButton
For Each Con In Application.CommandBars("Tools").Controls
If Con.Caption = "C&lean Active Workbook" Then
Con.Delete
End If
Next
Set ComBut = Application.CommandBars("Tools").Controls.Add(msoControlButton)
ComBut.Caption = "C&lean Active Workbook"
ComBut.OnAction = "CleanBook"
ComBut.FaceId = 59
End Sub
HTH,
D
Like this thread? Share it with others