Same sub in two modules, wrong one gets called?

  • Thread starter Thread starter Maury Markowitz
  • Start date Start date
M

Maury Markowitz

I have two modules, production and testing. I have a menu bar with
buttons on it, which is populated in code like this:

Sub AddButton(barName As String, buttonName As String, commandName As
String)
Set newbutton = Application.CommandBars(barName).Controls.Add
(Type:=msoControlButton)
With newbutton
.OnAction = commandName
.Caption = buttonName
.Style = msoButtonCaption
.Visible = True
End With
End Sub

I am adding buttons to the bar like this:

Call AddButton("STAT", "Imply parameters", "testing.xla!Solve")

In spite of the name being fully qualified with the correct module
name, this button continues to call the version of Solve in
"production.xla". It's very annoying.

Any advice?

Maury
 
Try this:

Application.CommandBars(barName).Reset

Then run your AddButton code again.


RBS
 
Try this:

  Application.CommandBars(barName).Reset
Click to expand...

Method "Reset" of object "CommandBar" failed.

What does the help mean when it says "Resets a built-in command bar to
its default configuration". What is the "default configuration"?

Maury
 
Back
Top