Hello
from programmers help:
' Set a reference to the user interface manager.
Dim oUIManager As UserInterfaceManager
Set oUIManager = oApp.UserInterfaceManager
' Get the ribbon associated with part documents
Dim oRibbon As Ribbon
Set oRibbon = oUIManager.Ribbons.Item("Part")
' Create a new tab
Dim oTab As RibbonTab
Set oTab = oRibbon.RibbonTabs.Add("My Tab", "invrMyTab", "CLSID of the AddIn", , , False)
' Create a new panel within the tab
Dim oPanel As RibbonPanel
Set oPanel = oTab.RibbonPanels.Add("My Panel", "invrMyPanel", "CLSID of the AddIn")
' Create a control within the panel
Call oPanel.CommandControls.AddButton(oButtonDefinition, True)
Adding a new tab is easy. I'm not sure what's the confusing point?!?
R. Krieg
RKW Solutions
www.rkw-solutions.com