Solved

Getting my icon in the Add-Ins menu

Posted on 2002-06-20
9
136 Views
Last Modified: 2010-05-02
I have created an add-in for VB. When it loads I want a cool icon like most of the other add-ins have in the Add-Ins menu...

So, how do I do it?
0
Comment
Question by:schworak
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
9 Comments
 
LVL 70

Expert Comment

by:Éric Moreau
ID: 7097277
0
 
LVL 3

Author Comment

by:schworak
ID: 7097480
Either that doesn't relate, or I am missing the connection. That link seems to be a control that helps me get icons in to menues of my app.

I am trying to get an icon on to the menu of the VB editor in the Add-Ins menu.

Am I missing it?
0
 
LVL 70

Expert Comment

by:Éric Moreau
ID: 7097657
I miss the point! I have never seen such a thing!
0
Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
LVL 3

Author Comment

by:schworak
ID: 7098564
You have never seen such code to do this? Or you have never seen the icons in the menu?

I have been having trouble finding the code myself. But since every other add in has icon's in the menu it must be posible.
0
 
LVL 70

Expert Comment

by:Éric Moreau
ID: 7098586
I have never seen such code to do this.
0
 
LVL 3

Author Comment

by:schworak
ID: 7099394
I FOUND IT!


It was so simple I want to smack myself...


In the AddToAddInCommandBar routine (created when you start an AddIn project) you simply add the following code after setting the menu item's caption...


Clipboard.SetData LoadResPicture(1000,0)
cbMenuCommandBar.PasteFace


Of course, LoadResPicture can be any routine that gets your icon image. Note, PASTEFACE only works with bitmaps not ICONs. You need it in the clipboard then you use the PasteFace command to stick it to the menu. Oh so simple!


For a great article that includes the code above see...
http://www.devx.com/premier/mgznarch/vbpj/1997/10oct97/cb1097.pdf

It is written for VB5 but works 100% on VB6 too.



0
 
LVL 70

Expert Comment

by:Éric Moreau
ID: 7099495
Ask the community support to refund your points and move the question to PAQ. Others will surely use it later!
0
 

Accepted Solution

by:
ComTech earned 0 total points
ID: 7099770
As per request and confirmed, this question will now be placed in PAQ, and points refunded.

Regards,
ComTech
CS Admin @ EE
0
 

Expert Comment

by:mhdhallak
ID: 8093835
thanks man i wanted to do the same thing and i found that link very helpful
0

Featured Post

Announcing the Most Valuable Experts of 2016

MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

When trying to find the cause of a problem in VBA or VB6 it's often valuable to know what procedures were executed prior to the error. You can use the Call Stack for that but it is often inadequate because it may show procedures you aren't intereste…
Since upgrading to Office 2013 or higher installing the Smart Indenter addin will fail. This article will explain how to install it so it will work regardless of the Office version installed.
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…

726 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question