I've made some custom add-ins and have also followed cook book examples. My
Excel does not show these add-ins in the Tools Menu- although the cookbooks
imply it should. I can get the add-ins that come with MS Excel to show in
the Tools menu. I need a way to execute my custom macros using any MS Excel
file opened. Is there a trick in being able to run Macros either from a
toolbar or other menu source for any openned Excel file when the open Excel
file does not contain the VB code? How can I see and execute these macro
commands?

Did you save it as an add-in

--
davesexce
-----------------------------------------------------------------------
davesexcel's Profile: http://www.excelforum.com/member.php...fo&userid=3170
View this thread: http://www.excelforum.com/showthread.php?threadid=52398

Yes. I saved it as an .xla following the standard cook book procedures. It
seems that creating a custom toolbar may be an answer and saving that as an
xla. Where the commands in the toolbar execute the macros. I've read
several discussions and will experiement. Don't know if that works. Thanks.


"davesexcel" wrote:


Did you save it as an add-in?


--
davesexcel
------------------------------------------------------------------------
davesexcel's Profile: http://www.excelforum.com/member.php...o&userid=31708
View this thread: http://www.excelforum.com/showthread...hreadid=523986

Hi VB Office Bruce

Do you use Excel 2003 ?

--
Regards Ron de Bruin
http://www.rondebruin.nl



"VB Office Bruce" wrote in message
...
Yes. I saved it as an .xla following the standard cook book procedures.
It
seems that creating a custom toolbar may be an answer and saving that as
an
xla. Where the commands in the toolbar execute the macros. I've read
several discussions and will experiement. Don't know if that works.
Thanks.


"davesexcel" wrote:


Did you save it as an add-in?


--
davesexcel
------------------------------------------------------------------------
davesexcel's Profile:
http://www.excelforum.com/member.php...o&userid=31708
View this thread:
http://www.excelforum.com/showthread...hreadid=523986

Try to run this code first to see if it is working

Sub MenuBar_Item_Item()
Dim MenuItem As CommandBarControl
MenuBar_Item_Item_Delete

Set MenuItem = Application.CommandBars.FindControl(, 30007) 'Tools menu
If MenuItem Is Nothing Then Exit Sub
With MenuItem.Controls.Add(msoControlButton, 1, , , True)
.Caption = "&Ron de Bruin"
.OnAction = ThisWorkbook.Name & "!TestMacro"
.BeginGroup = True
.Tag = "MenuItemTag"
End With
Set MenuItem = Nothing
End Sub

Sub MenuBar_Item_Item_Delete()
Dim MenuItem As CommandBarControl
Set MenuItem = Application.CommandBars.FindControl(Tag:="MenuItem Tag")
If Not MenuItem Is Nothing Then
MenuItem.Delete
End If
Set MenuItem = Nothing
End Sub



--
Regards Ron de Bruin
http://www.rondebruin.nl


"Ron de Bruin" wrote in message ...
Hi VB Office Bruce

Do you use Excel 2003 ?

--
Regards Ron de Bruin
http://www.rondebruin.nl



"VB Office Bruce" wrote in message
...
Yes. I saved it as an .xla following the standard cook book procedures. It
seems that creating a custom toolbar may be an answer and saving that as an
xla. Where the commands in the toolbar execute the macros. I've read
several discussions and will experiement. Don't know if that works. Thanks.


"davesexcel" wrote:


Did you save it as an add-in?


--
davesexcel
------------------------------------------------------------------------
davesexcel's Profile: http://www.excelforum.com/member.php...o&userid=31708
View this thread: http://www.excelforum.com/showthread...hreadid=523986

Hi Ron de Bruin,

I am using Excel 2000 on one computer and Excel 2003 on another. Code
worked fine on 2003- will it work on 2000 version. Understood that direction
and modified it to run the Macro I created. Again, the code worked
PERFECTLY!!!!!

If I turn it into an Add-In, do I put the code in ThisWorkbook and then
follow the procedure or can I leave it as a module?

Thanks a lot!

"Ron de Bruin" wrote:

Try to run this code first to see if it is working

Sub MenuBar_Item_Item()
Dim MenuItem As CommandBarControl
MenuBar_Item_Item_Delete

Set MenuItem = Application.CommandBars.FindControl(, 30007) 'Tools menu
If MenuItem Is Nothing Then Exit Sub
With MenuItem.Controls.Add(msoControlButton, 1, , , True)
.Caption = "&Ron de Bruin"
.OnAction = ThisWorkbook.Name & "!TestMacro"
.BeginGroup = True
.Tag = "MenuItemTag"
End With
Set MenuItem = Nothing
End Sub

Sub MenuBar_Item_Item_Delete()
Dim MenuItem As CommandBarControl
Set MenuItem = Application.CommandBars.FindControl(Tag:="MenuItem Tag")
If Not MenuItem Is Nothing Then
MenuItem.Delete
End If
Set MenuItem = Nothing
End Sub



--
Regards Ron de Bruin
http://www.rondebruin.nl


"Ron de Bruin" wrote in message ...
Hi VB Office Bruce

Do you use Excel 2003 ?

--
Regards Ron de Bruin
http://www.rondebruin.nl



"VB Office Bruce" wrote in message
...
Yes. I saved it as an .xla following the standard cook book procedures. It
seems that creating a custom toolbar may be an answer and saving that as an
xla. Where the commands in the toolbar execute the macros. I've read
several discussions and will experiement. Don't know if that works. Thanks.


"davesexcel" wrote:


Did you save it as an add-in?


--
davesexcel
------------------------------------------------------------------------
davesexcel's Profile: http://www.excelforum.com/member.php...o&userid=31708
View this thread: http://www.excelforum.com/showthread...hreadid=523986

You can run the macro in the open and close event in the thisworkbook module of the add-in

Private Sub Workbook_BeforeClose(Cancel As Boolean)
MenuBar_Item_Item_Delete
End Sub

Private Sub Workbook_Open()
MenuBar_Item_Item
End Sub





--
Regards Ron de Bruin
http://www.rondebruin.nl


"VB Office Bruce" wrote in message
...
Hi Ron de Bruin,

I am using Excel 2000 on one computer and Excel 2003 on another. Code
worked fine on 2003- will it work on 2000 version. Understood that direction
and modified it to run the Macro I created. Again, the code worked
PERFECTLY!!!!!

If I turn it into an Add-In, do I put the code in ThisWorkbook and then
follow the procedure or can I leave it as a module?

Thanks a lot!

"Ron de Bruin" wrote:

Try to run this code first to see if it is working

Sub MenuBar_Item_Item()
Dim MenuItem As CommandBarControl
MenuBar_Item_Item_Delete

Set MenuItem = Application.CommandBars.FindControl(, 30007) 'Tools menu
If MenuItem Is Nothing Then Exit Sub
With MenuItem.Controls.Add(msoControlButton, 1, , , True)
.Caption = "&Ron de Bruin"
.OnAction = ThisWorkbook.Name & "!TestMacro"
.BeginGroup = True
.Tag = "MenuItemTag"
End With
Set MenuItem = Nothing
End Sub

Sub MenuBar_Item_Item_Delete()
Dim MenuItem As CommandBarControl
Set MenuItem = Application.CommandBars.FindControl(Tag:="MenuItem Tag")
If Not MenuItem Is Nothing Then
MenuItem.Delete
End If
Set MenuItem = Nothing
End Sub



--
Regards Ron de Bruin
http://www.rondebruin.nl


"Ron de Bruin" wrote in message ...
Hi VB Office Bruce

Do you use Excel 2003 ?

--
Regards Ron de Bruin
http://www.rondebruin.nl



"VB Office Bruce" wrote in message
...
Yes. I saved it as an .xla following the standard cook book procedures. It
seems that creating a custom toolbar may be an answer and saving that as an
xla. Where the commands in the toolbar execute the macros. I've read
several discussions and will experiement. Don't know if that works. Thanks.


"davesexcel" wrote:


Did you save it as an add-in?


--
davesexcel
------------------------------------------------------------------------
davesexcel's Profile: http://www.excelforum.com/member.php...o&userid=31708
View this thread: http://www.excelforum.com/showthread...hreadid=523986

Is there a difference between saving it as a xla file and saving it as an
Add-In? I followed the save as Add-In protocol, yet it really came down to
saving it as an xla file with some descriptions added and security? Is there
something I'm missing?

"VB Office Bruce" wrote:

Yes. I saved it as an .xla following the standard cook book procedures. It
seems that creating a custom toolbar may be an answer and saving that as an
xla. Where the commands in the toolbar execute the macros. I've read
several discussions and will experiement. Don't know if that works. Thanks.


"davesexcel" wrote:


Did you save it as an add-in?


--
davesexcel
------------------------------------------------------------------------
davesexcel's Profile: http://www.excelforum.com/member.php...o&userid=31708
View this thread: http://www.excelforum.com/showthread...hreadid=523986

Ron de Bruin, YOU ARE AN MVP!!!!! Does this mean that before any xls file
can use this Maco, once the excel application is loaded with this ADD-IN? In
other words, it will always show up in the menu? Thanks again!!!!

"Ron de Bruin" wrote:

You can run the macro in the open and close event in the thisworkbook module of the add-in

Private Sub Workbook_BeforeClose(Cancel As Boolean)
MenuBar_Item_Item_Delete
End Sub

Private Sub Workbook_Open()
MenuBar_Item_Item
End Sub





--
Regards Ron de Bruin
http://www.rondebruin.nl


"VB Office Bruce" wrote in message
...
Hi Ron de Bruin,

I am using Excel 2000 on one computer and Excel 2003 on another. Code
worked fine on 2003- will it work on 2000 version. Understood that direction
and modified it to run the Macro I created. Again, the code worked
PERFECTLY!!!!!

If I turn it into an Add-In, do I put the code in ThisWorkbook and then
follow the procedure or can I leave it as a module?

Thanks a lot!

"Ron de Bruin" wrote:

Try to run this code first to see if it is working

Sub MenuBar_Item_Item()
Dim MenuItem As CommandBarControl
MenuBar_Item_Item_Delete

Set MenuItem = Application.CommandBars.FindControl(, 30007) 'Tools menu
If MenuItem Is Nothing Then Exit Sub
With MenuItem.Controls.Add(msoControlButton, 1, , , True)
.Caption = "&Ron de Bruin"
.OnAction = ThisWorkbook.Name & "!TestMacro"
.BeginGroup = True
.Tag = "MenuItemTag"
End With
Set MenuItem = Nothing
End Sub

Sub MenuBar_Item_Item_Delete()
Dim MenuItem As CommandBarControl
Set MenuItem = Application.CommandBars.FindControl(Tag:="MenuItem Tag")
If Not MenuItem Is Nothing Then
MenuItem.Delete
End If
Set MenuItem = Nothing
End Sub



--
Regards Ron de Bruin
http://www.rondebruin.nl


"Ron de Bruin" wrote in message ...
Hi VB Office Bruce

Do you use Excel 2003 ?

--
Regards Ron de Bruin
http://www.rondebruin.nl



"VB Office Bruce" wrote in message
...
Yes. I saved it as an .xla following the standard cook book procedures. It
seems that creating a custom toolbar may be an answer and saving that as an
xla. Where the commands in the toolbar execute the macros. I've read
several discussions and will experiement. Don't know if that works. Thanks.


"davesexcel" wrote:


Did you save it as an add-in?


--
davesexcel
------------------------------------------------------------------------
davesexcel's Profile: http://www.excelforum.com/member.php...o&userid=31708
View this thread: http://www.excelforum.com/showthread...hreadid=523986

If you want your addin to appear in the selections for Tools=Addins so the
user doesn't have to browse for it, then you need to save it or copy it to
the Addin Directory. You can find this by running this code

Sub ShowPath()
msgbox Application.LibraryPath
End Sub

for me (demo'd from the immediate window)

? Application.LibraryPath
C:\PROGRAM FILES\MICROSOFT OFFICE\OFFICE\LIBRARY

as an example.

--
Regards,
Tom Ogilvy



"VB Office Bruce" wrote in message
...
Hi Ron de Bruin,

I am using Excel 2000 on one computer and Excel 2003 on another. Code
worked fine on 2003- will it work on 2000 version. Understood that
direction
and modified it to run the Macro I created. Again, the code worked
PERFECTLY!!!!!

If I turn it into an Add-In, do I put the code in ThisWorkbook and then
follow the procedure or can I leave it as a module?

Thanks a lot!

"Ron de Bruin" wrote:

Try to run this code first to see if it is working

Sub MenuBar_Item_Item()
Dim MenuItem As CommandBarControl
MenuBar_Item_Item_Delete

Set MenuItem = Application.CommandBars.FindControl(, 30007)
'Tools menu
If MenuItem Is Nothing Then Exit Sub
With MenuItem.Controls.Add(msoControlButton, 1, , , True)
.Caption = "&Ron de Bruin"
.OnAction = ThisWorkbook.Name & "!TestMacro"
.BeginGroup = True
.Tag = "MenuItemTag"
End With
Set MenuItem = Nothing
End Sub

Sub MenuBar_Item_Item_Delete()
Dim MenuItem As CommandBarControl
Set MenuItem =
Application.CommandBars.FindControl(Tag:="MenuItem Tag")
If Not MenuItem Is Nothing Then
MenuItem.Delete
End If
Set MenuItem = Nothing
End Sub



--
Regards Ron de Bruin
http://www.rondebruin.nl


"Ron de Bruin" wrote in message
...
Hi VB Office Bruce

Do you use Excel 2003 ?

--
Regards Ron de Bruin
http://www.rondebruin.nl



"VB Office Bruce" wrote in
message
...
Yes. I saved it as an .xla following the standard cook book
procedures. It
seems that creating a custom toolbar may be an answer and saving that
as an
xla. Where the commands in the toolbar execute the macros. I've
read
several discussions and will experiement. Don't know if that works.
Thanks.


"davesexcel" wrote:


Did you save it as an add-in?


--
davesexcel

------------------------------------------------------------------------
davesexcel's Profile:
http://www.excelforum.com/member.php...o&userid=31708
View this thread:
http://www.excelforum.com/showthread...hreadid=523986

You can install your add-in with ToolsAdd-ins
Browse to the file
OK
You see it now in the list
Check it
OK

Every time you open Excel your add-in will load and you can use the menu
in Tools in every workbook.

--
Regards Ron de Bruin
http://www.rondebruin.nl


"VB Office Bruce" wrote in message
...
Ron de Bruin, YOU ARE AN MVP!!!!! Does this mean that before any xls file
can use this Maco, once the excel application is loaded with this ADD-IN? In
other words, it will always show up in the menu? Thanks again!!!!

"Ron de Bruin" wrote:

You can run the macro in the open and close event in the thisworkbook module of the add-in

Private Sub Workbook_BeforeClose(Cancel As Boolean)
MenuBar_Item_Item_Delete
End Sub

Private Sub Workbook_Open()
MenuBar_Item_Item
End Sub





--
Regards Ron de Bruin
http://www.rondebruin.nl


"VB Office Bruce" wrote in message
...
Hi Ron de Bruin,

I am using Excel 2000 on one computer and Excel 2003 on another. Code
worked fine on 2003- will it work on 2000 version. Understood that direction
and modified it to run the Macro I created. Again, the code worked
PERFECTLY!!!!!

If I turn it into an Add-In, do I put the code in ThisWorkbook and then
follow the procedure or can I leave it as a module?

Thanks a lot!

"Ron de Bruin" wrote:

Try to run this code first to see if it is working

Sub MenuBar_Item_Item()
Dim MenuItem As CommandBarControl
MenuBar_Item_Item_Delete

Set MenuItem = Application.CommandBars.FindControl(, 30007) 'Tools menu
If MenuItem Is Nothing Then Exit Sub
With MenuItem.Controls.Add(msoControlButton, 1, , , True)
.Caption = "&Ron de Bruin"
.OnAction = ThisWorkbook.Name & "!TestMacro"
.BeginGroup = True
.Tag = "MenuItemTag"
End With
Set MenuItem = Nothing
End Sub

Sub MenuBar_Item_Item_Delete()
Dim MenuItem As CommandBarControl
Set MenuItem = Application.CommandBars.FindControl(Tag:="MenuItem Tag")
If Not MenuItem Is Nothing Then
MenuItem.Delete
End If
Set MenuItem = Nothing
End Sub



--
Regards Ron de Bruin
http://www.rondebruin.nl


"Ron de Bruin" wrote in message ...
Hi VB Office Bruce

Do you use Excel 2003 ?

--
Regards Ron de Bruin
http://www.rondebruin.nl



"VB Office Bruce" wrote in message
...
Yes. I saved it as an .xla following the standard cook book procedures. It
seems that creating a custom toolbar may be an answer and saving that as an
xla. Where the commands in the toolbar execute the macros. I've read
several discussions and will experiement. Don't know if that works. Thanks.


"davesexcel" wrote:


Did you save it as an add-in?


--
davesexcel
------------------------------------------------------------------------
davesexcel's Profile: http://www.excelforum.com/member.php...o&userid=31708
View this thread: http://www.excelforum.com/showthread...hreadid=523986

Hi Ron de Bruin

It works againa GREAT!! Thank you. I checked out your website. It's also
very helpful.

Thanks again, Bruce

"Ron de Bruin" wrote:

You can install your add-in with ToolsAdd-ins
Browse to the file
OK
You see it now in the list
Check it
OK

Every time you open Excel your add-in will load and you can use the menu
in Tools in every workbook.

--
Regards Ron de Bruin
http://www.rondebruin.nl


"VB Office Bruce" wrote in message
...
Ron de Bruin, YOU ARE AN MVP!!!!! Does this mean that before any xls file
can use this Maco, once the excel application is loaded with this ADD-IN? In
other words, it will always show up in the menu? Thanks again!!!!

"Ron de Bruin" wrote:

You can run the macro in the open and close event in the thisworkbook module of the add-in

Private Sub Workbook_BeforeClose(Cancel As Boolean)
MenuBar_Item_Item_Delete
End Sub

Private Sub Workbook_Open()
MenuBar_Item_Item
End Sub





--
Regards Ron de Bruin
http://www.rondebruin.nl


"VB Office Bruce" wrote in message
...
Hi Ron de Bruin,

I am using Excel 2000 on one computer and Excel 2003 on another. Code
worked fine on 2003- will it work on 2000 version. Understood that direction
and modified it to run the Macro I created. Again, the code worked
PERFECTLY!!!!!

If I turn it into an Add-In, do I put the code in ThisWorkbook and then
follow the procedure or can I leave it as a module?

Thanks a lot!

"Ron de Bruin" wrote:

Try to run this code first to see if it is working

Sub MenuBar_Item_Item()
Dim MenuItem As CommandBarControl
MenuBar_Item_Item_Delete

Set MenuItem = Application.CommandBars.FindControl(, 30007) 'Tools menu
If MenuItem Is Nothing Then Exit Sub
With MenuItem.Controls.Add(msoControlButton, 1, , , True)
.Caption = "&Ron de Bruin"
.OnAction = ThisWorkbook.Name & "!TestMacro"
.BeginGroup = True
.Tag = "MenuItemTag"
End With
Set MenuItem = Nothing
End Sub

Sub MenuBar_Item_Item_Delete()
Dim MenuItem As CommandBarControl
Set MenuItem = Application.CommandBars.FindControl(Tag:="MenuItem Tag")
If Not MenuItem Is Nothing Then
MenuItem.Delete
End If
Set MenuItem = Nothing
End Sub



--
Regards Ron de Bruin
http://www.rondebruin.nl


"Ron de Bruin" wrote in message ...
Hi VB Office Bruce

Do you use Excel 2003 ?

--
Regards Ron de Bruin
http://www.rondebruin.nl



"VB Office Bruce" wrote in message
...
Yes. I saved it as an .xla following the standard cook book procedures. It
seems that creating a custom toolbar may be an answer and saving that as an
xla. Where the commands in the toolbar execute the macros. I've read
several discussions and will experiement. Don't know if that works. Thanks.


"davesexcel" wrote:


Did you save it as an add-in?


--
davesexcel
------------------------------------------------------------------------
davesexcel's Profile: http://www.excelforum.com/member.php...o&userid=31708
View this thread: http://www.excelforum.com/showthread...hreadid=523986