Lilel problem med Excel macro i VBA - kan ikke køre en sub

Har lavet en add-in (.xla) i macro, der laver nogle menuer. Men når et menupunkt aktiveres kommer fejlen:

The macro TextAddIn.xla!MinMacro cannot be found

Koden:

Set cbMainMenuBar = Application.CommandBars("Worksheet Menu Bar")

iHelpMenu = cbMainMenuBar.Controls("Help").Index

Set cbcCutomMenu = cbMainMenuBar.Controls.Add(Type:=msoControlPopup, Before:=iHelpMenu)

cbcCutomMenu.Caption = "&Menutitel"

With cbcCutomMenu.Controls.Add(Type:=msoControlButton)
  .Caption = "Undermenu"
  .OnAction = "MinMacro"
Edd With

Jeg har forsøgt at lave en sub ved navn MinMacro både som public og private, men den køre ikke. Hvad glemmer jeg?