Custom Ribbon UI

[jillibillijames]

Hi,

I have around 25 macro's written in different excel files,
I want to add a tab in the Excel-Ribbon and link my macro's there.
Can you help me...

[AjitD]

Hi,

You can try this-:

1.Consolidate all macros in one workbook.
2.Save workbook as Excel - Addins
3.You can add a tab through Office 2007 Custome UI Editor
4. Create groups and buttons in that tab.
5.Assign sub procedures to buttons created in tab.

[jillibillijames]

Hi,
Thank you very much for your response, could you please explain me the step.3-add a tab through Office 2007 Custome UI Editor.

[AjitD]

Hi,

U can refer these links

http://www.rondebruin.nl/ribbon.htm

http://msdn.microsoft.com/en-us/library/ee691832.aspx

[jillibillijames]

Hi,

Thank you first of all, sorry to bother you again & again.
I have followed all the steps successfully finally i got a button in Excel-file menu with name 'Book 1', but i need a new tap where i can assign the buttons that i required. plz

[w1ckd]

Hi,

I am using this to add macros to the ribbon, try it out, maybe it will fit

Private Sub CommandButton1_Click()
Dim NewButton As CommandBarButton

On Error GoTo Nocommandbar

Set NewButton = Application.CommandBars("Reporting").Controls.Add
On Error GoTo 0
With NewButton

.Caption = "Statement" 

.Style = msoButtonIconAndCaption
.FaceId = 1763 'Custom button, loog google for what id is what logo
.OnAction = "x://GSAPStatementMacro.xls'!GSAPstatement" 'Refers to the excel file with the macro name
End With
GoTo Exitline
Nocommandbar:
Application.CommandBars.Add(Name:="Reporting").Visible = True
Set NewButton = Application.CommandBars("Reporting").Controls.Add
Resume Next
Exitline:
Application.CommandBars("Reporting").Visible = True
End Sub

See it in action here:
http://s9.postimage.org/6xzzhtc67/Capture.jpg