Hello! Do you have a question about Windows Server or Windows Client for IT Pros?

Please note that both categories together with questions have been moved to Microsoft Q&A. This change will help us provide a more streamlined and efficient experience for all your questions and discussions.

Windows Client for It Pros
Windows Server

Word Top Contributors:

Stefan Blom - Charles Kenyon - Suzanne S. Barnhill - Doug Robbins - MVP Office Apps & Services (Word) - Bob Jones AKA: CyberTaz ✅

Ask a new question

Dale.Fye

Extracting commandbar FaceIDs for use as image in an image control

I've figured out how to extract both the PICTURE and MASK properties of the FaceId of any of the Office commandbar controls, and save those two properties as images on my computer.

        Set ctrl = CommandBars.FindControl(Id:=rs!FaceId)
        stdole.SavePicture ctrl.Picture, "E:\TempPic.bmp"
        stdole.SavePicture ctrl.Mask, "E:\TempMask.bmp"

But what I want to do is create an image picker that displays a set of these images in a form, either in an image control or as the picture property of a command button. Unfortunately, neither the image control or the command button has a Mask property, so the background of all of the picture images are black, rather than what they are supposed to be. The attached image shows the first 15 faceIDs, with the top row displaying the image saved with the PICTURE property and the bottom row showing the image created with the MASK property.

Is there a way to combine these to properties, or to save the image as a gif or other image type, which can then be assigned to the PICTURE property of an image control or a command button?

This thread is locked. You can vote as helpful, but you cannot reply or subscribe to this thread.

Answer

Doug Robbins - MVP Office Apps & Services (Word)

See the following page of fellow MVP Ron de Bruin's website

http://www.rondebruin.nl/win/s2/win003.htm

and down load the Excel 2007 Version under the heading "Find the Control, Group and Tab names"

Hope this helps,
Doug Robbins - MVP Office Apps & Services (Word)
dougrobbinsmvp@gmail.com
It's time to replace ‘Diversity, Equity & Inclusion’ with ‘Excellence, Opportunity & Civility’ - V Ramaswamy

Hello! Do you have a question about Windows Server or Windows Client for IT Pros?

Word Top Contributors:

Dale.Fye

Extracting commandbar FaceIDs for use as image in an image control

Doug Robbins - MVP Office Apps & Services (Word)

Replies (2)

Question Info

Dale.Fye

Extracting commandbar FaceIDs for use as image in an image control

Doug Robbins - MVP Office Apps & Services (Word)

Replies (2) 

Question Info

Replies (2)