XL2000: Cannot Add Macros to the Tools Menu

ID: Q213587

The information in this article applies to:

Microsoft Excel 2000

SYMPTOMS

When you record a new macro, you do not have the option of creating a menu item on the Tools menu for the new macro.

Also, if you try to use the MacroOptions method to create a menu item on the Tools menu for a macro, the method fails to create the new menu item.

CAUSE

This behavior occurs because this feature has been removed from Microsoft Excel.

WORKAROUND

Microsoft provides programming examples for illustration only, without warranty either expressed or implied, including, but not limited to, the implied warranties of merchantability and/or fitness for a particular purpose. This article assumes that you are familiar with the programming language being demonstrated and the tools used to create and debug procedures. Microsoft support professionals can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific needs. If you have limited programming experience, you may want to contact a Microsoft Certified Solution Provider or the Microsoft fee-based consulting line at (800) 936-5200. For more information about Microsoft Certified Solution Providers, please see the following page on the World Wide Web:

http://www.microsoft.com/mcsp/

For more information about the support options available from Microsoft, please see the following page on the World Wide Web:

http://www.microsoft.com/support/supportnet/overview/overview.asp

You can still create and delete new menu items for macros on the Tools menu. To do this, you must use the Add and Delete methods for CommandBars.

In the following example, the Visual Basic macro code creates an item on the Tools menu called Run Test and assigns the macro Test to the menu item:


Sub AddTesttoToolsMenu()
    Set xItem = _
         CommandBars("Tools").Controls.Add(Type:=msoControlButton)
    With xItem
        .Caption = "Run Test"
        .OnAction = "Test"
    End With
End Sub

To remove the menu item, use this code:


Sub RemoveTestFromToolsMenu()
    CommandBars("Tools").Controls("Run Test").Delete
End Sub

To add or remove a menu item from the Tools menu, you must use a Visual Basic macro.

Additional query words: vba XL2000 command bars bar commandbar

Keywords : kbprg
Version : WINDOWS:2000
Platform : WINDOWS
Issue type : kbprb