face id / create new icon

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hi all,
I have downloaded various Face Id Add-ins, to check what icons Face Ids are.
Is it possible to create new or edit icons and paste these into the blank
spaces where no icons are present ?

Many thanks for any help/suggestions
 
Hi Labrev,

First add a default button to a toolbar:

View | Toolbars | Customize | Categories | scroll to Macros | drag the
smiley button in the Commands window to the tool bar of your choice | Close

To edit the icon:
Right-click the icon | right-click the icon again | Edit Button Image | Use
the opened button editor to effect changes | OK | Close

To copy an existing grahic or icon image:
Copy the graphic | Right-click the icon | right-click the icon again | Paste
Button Image | Close.

To use a selection of alternative button icons:
Right-click the icon | right-click the icon again | Change Button Image |
Select an icon | Close.

The bult-in button editor is very rudimentary: you could perform a Google
search for icon editors or icons.
 
Norman Jones said:
Hi Labrev,

First add a default button to a toolbar:

View | Toolbars | Customize | Categories | scroll to Macros | drag the
smiley button in the Commands window to the tool bar of your choice | Close

To edit the icon:
Right-click the icon | right-click the icon again | Edit Button Image | Use
the opened button editor to effect changes | OK | Close

To copy an existing grahic or icon image:
Copy the graphic | Right-click the icon | right-click the icon again | Paste
Button Image | Close.

To use a selection of alternative button icons:
Right-click the icon | right-click the icon again | Change Button Image |
Select an icon | Close.

The bult-in button editor is very rudimentary: you could perform a Google
search for icon editors or icons.


---
Regards,
Norman






Thanks Norman,
got all that sorted, my problem ( should have given more info on initial
question) is that when I open the file, a new Custom toolbar is displayed and
the Worksheet menu bar is removed.This new CB works fine but I want to tart
it up with some new icons.
here is some code >>

Sub CreateMenu()
Dim cb As CommandBar, cbMenu As CommandBarControl, cbSubMenu As
CommandBarControl
DeleteCommandBar ' delete the custom menu if it already exists
' create a new menu bar to replace the built-in menu bar
Set cb = Application.CommandBars.Add("MyCommandBarName", msoBarTop,
True, True)
' create a new menu on an existing commandbar (the next 6 lines)
Set cbMenu = cb.Controls.Add(msoControlPopup, , , , True)
With cbMenu
.Caption = "&football"
.Tag = "MyTag"
.BeginGroup = False
End With

' add menuitem to menu
With cbMenu.Controls.Add(msoControlButton, 1, , , True)
.Caption = "&Leagues"
.OnAction = ThisWorkbook.Name & "!Macroname"
.Style = msoButtonIconAndCaption
.FaceId = ?

when I edit/create icon, it always goes back to its original state when the
new CB is loaded.
Hope this helps my cause

Again many thanks
 
You can create icons and load them into a worksheet and paste them into your
new toolbars.
In essence, you need to have the icons as an image somewhere and load the
shape. I do this by putting them on a hidden sheet on the workbook that the
commandbar is created from, with code somewhat like

cbTable.Shapes(shapename).Copy­Picture
cbCtl.PasteFace


where cbTable is the codename of the sheet containing the picture, shapename
is the name of the shape, such as 'Picture 30', and cbCtl is an object
variable for the control being added.


If you want to use the builtin faceids, you would use something like


cbCtl.FaceId = faceIdNum
 
Bob,
Thanks for your help, having a go at it that later.
If I can't get my head round it , I'll just not put icons in :)
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Back
Top