Control Face ID's

[Guest]

Does anyone know of a website or macro to display all of the possible "Face
ID's" for control buttons?

Thanks in advance,

Christmas May

 

[Norman Jones]

Hi Christmas,

See:

http://www.j-walk.com/ss/excel/tips/tip67.htm

 

[David McRitchie]

Hi Christmas,
one such program is Jim Rech's
Button Faces (BtnFaces), Jim Rech, download from Stephen Bullen's MVP page.
http://www.oaltd.co.uk/MVP/Default.htm

for more information see
Identification of Toolbars Buttons (icons) (#identify)
http://www.mvps.org/dmcritchie/excel/toolbars.htm#identify

 

[Jim Rech]

Norman-

The shortcoming of John's utility is that it is a "picture" of the icon
faces in Excel 97. The way I did my utility is to show the actually faces
available in the user's version of Excel. There are many more faces in more
recent Excels than in Excel 97.

--
Jim
| Hi Christmas,
|
| See:
|
| http://www.j-walk.com/ss/excel/tips/tip67.htm
|
|
| ---
| Regards,
| Norman
|
|
|
| | > Does anyone know of a website or macro to display all of the possible
| > "Face
| > ID's" for control buttons?
| >
| > Thanks in advance,
| >
| > Christmas May
|
|

 

[Guest]

Hi Christmas,

Other learned members of the community seem to have provided a number of
useful options that should meet your need. Just in case it hasn't been,
here's another option ...

Sub CreateFace()
Dim i As Integer
Dim TempItem(256)
On Error Resume Next
CommandBars("Temporary").Delete
' Create a temporary toolbar to hold and display button faces.
Set TempBar = CommandBars.Add(Name:="Temporary",
Position:=msoBarFloating, Temporary:=True)
TempBar.Visible = True

For i = 1 To 128 ' Increase/Decrease as desired e.g. i = 2049 to
2304. Dim TempItem() accordingly.
Set TempItem(i) = TempBar.Controls.Add(Type:=msoControlButton,
Temporary:=True)
With TempItem(i)
.FaceId = i
.Caption = .FaceId
.Style = msoButtonIconAndCaption
' Replace 2586 with the face you like.
If .FaceId = 2586 Then .CopyFace
' .CopyFace copies this face (image) to the clipboard.
' You can then paste the image into other programs.
End With
Next
End Sub

(Resize the resulting toolbar as desired).

Office 2003 has in excess of 2,000 button faces available!

Regards, Sean.

 

[Norman Jones]

Hi Jim,

I am am not sure how I have contrived to miss your BtnFaces addin but, now
that I have found it, I must say that I like it a lot.

Thank you (and david) for drawing it to my attention.