Adding an item into Access menu under Add-In tab

Question

Hi

I have a menu from Access 2000 days which appears under Add-In tab. How can I add additional items to this menu such as new Access reports? Can I do it programmatically?

I have tried

      Dim msoControlButton, newItem  
        
      msoControlButton = 1  
        
          Set newItem = CommandBars("Main Toolbar").Controls("Reports").Add(Type:=msoControlButton)  
    With newItem  
        .BeginGroup = True  
        .Caption = "Client Forecast - Quote"  
        .FaceID = 0  
        .OnAction = "Date Range Forecast - Quote"  
    End With  

but it says 'Object doesn't support this property or method' on line 5 above.

Thanks

Regards

Answer 1

CommandBars were deprecated and shouldn't be used for customizing the ribbon UI any longer. Instead, you need to use the Fluent UI (aka Ribbon UI). Read more about the Fluent UI in the following series of articles:

• Customizing the 2007 Office Fluent Ribbon for Developers (Part 1 of 3)
• Customizing the 2007 Office Fluent Ribbon for Developers (Part 2 of 3)
• Customizing the 2007 Office Fluent Ribbon for Developers (Part 3 of 3)