Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
Home
DiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWord
DirectoryUser Groups
Related Topics
Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ...

MS Office Forum / Outlook / Programming VBA / August 2003

Tip: Looking for answers? Try searching our database.

Set objCBSearch = cbrEdit.Controls.Add(,1849) - will not work???

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
Ole Bergtun - 30 Jul 2003 13:21 GMT
I have this form where i build a pretty similar CommandBar like Menu
Bar, i have managed to build them the way i like almost...

On the edit CommandBarPopup i only want the find button but the addin
fails when i :
Set cbrEdit = cbrMyMinorMenuBarToolBar.Controls.Add(, 30003, , 2) '
Works
Set objCBSearch = cbrEdit.Controls.Add(,1849) 'failes

The error message that appears is like this:

-2147467259 - Method 'Add' of object 'CommanBarControls' failed

I appreciate all suggestions or if others have experienced likewise to
answer and share what you did to resolve this problem

Med vennlig hilsen
Ole Bergtun
Sue Mosher [MVP] - 29 Aug 2003 20:17 GMT
Try this:

Set objCBSearch = cbrEdit.CommandBar.Controls.Add(,1849) 'failes

A CommandBarPopup has a CommandBar object property
Signature

Sue Mosher, Outlook MVP
Outlook and Exchange solutions at http://www.slipstick.com
Author of
    Microsoft Outlook Programming: Jumpstart
    for Administrators, Power Users, and Developers
    http://www.outlookcode.com/jumpstart.aspx 

> I have this form where i build a pretty similar CommandBar like Menu
> Bar, i have managed to build them the way i like almost...
[quoted text clipped - 14 lines]
> Med vennlig hilsen
> Ole Bergtun
 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.