How to call a procedure from a custom command bar in Outlook 2007

[Sqt Waddle]

Hello and TIA for your assistance,

I am trying to convert VBA code in OL07 to an Add-in in VB6.

The Add-in creates a custom command bar with three buttons and fires code
when a new inspector is created.

When I load the add-in the command bar appears, the new inspector code fires
and the add-in disconnects on exit.

However, I cannot get the onaction event for the command bar buttons to fire.

The code that creates the button is:
Set custBar = Application.ActiveExplorer.CommandBars.Add(Name:="Show",
Position:=msoBarTop, Temporary:=True)
custBar.Visible = True


Set Cusbutton = custBar.Controls.Add(Type:=msoControlButton)
With Application.ActiveExplorer.CommandBars("Show").Controls(1)
.Style = msoButtonCaption
.Caption = "My Stuff"
.OnAction = "RunMyStuff"
.ToolTipText = "My Stuff"
.BeginGroup = True
.Tag = "Test Tag"
End With

Where should I place Sun RunMyStuff so that it will fire when the button is
clicked?

Thanks,

 

[Michael Bauer [MVP - Outlook]]

Don't use OnAction but a variable declared withEvents and set to the
CommandBarButton object. See this example:
http://www.vboffice.net/sample.html?mnu=2&lang=en&smp=16&cmd=showitem

--
Best regards
Michael Bauer - MVP Outlook
Manage and share your categories:
<http://www.vboffice.net/product.html?lang=en>


Am Sat, 6 Mar 2010 23:42:01 -0800 schrieb Sqt Waddle: