More Icons for Customised Buttons/Menu Entries

Topic

New Reply

Hi,

Word2000 offers a small selection of icons to choose for buttons you make, or Pull-down menus you make.

But this range is quite limited. How can I get Word to offer me a bigger range? How does Word obtain that selection from?

Pls. advise me.
Thanks,

m.q.

Reply | Quote

Replies

This is a job for FaceIDs! See attached Excel sheet. The id numbers are the same across all Office (Windows?) apps.

Reply | Quote

I’ve had the same problem. I downloaded a set of new icons a – .ico file (from memory) – then didn’t know how to use it!

Any ideas would be helpful!

Reply | Quote

see my response to ConradE above your post

Reply | Quote

Excellent; thanks.
Does anyone know the range – ie. min & max numbers that this utility can use?

m.q.

Reply | Quote

The highest I could see was 4387. And a pretty nondescript sort of thing it was too. There are a lot of gaps.

Reply | Quote

Hi,

Has anyone compiled any sort of Directory of these icons?

Thanks,

m.q.

Reply | Quote

Never mind a directory, has anyone found a way to sort them GRAPHICALLY so that all similar buttons appear together?

I got tired in the end and hacked the code to deliver all 1024 icons and made the toolbar permanent, then customized it by dragging all the blank faces off the thing.

Reply | Quote

Excellent,
Is this downloadable from your webpage – or can you pls. email it to me?

Thanks,

mqureshi@redfig.com

Reply | Quote

I would have thought it would be slightly difficult to produce VBA code to sort icons together automatically. If Chris could really do that, I’d automatically give him all orts of powers. Like being able to fend off 3 of Eileen’s warts. no, on second thought, I don’t even think Woody could do that.

Chris, your hacked code to at least show non-blanked icons sounds useful. Is it worth posting?

Reply | Quote

Here ’tis as an attachment.

C A U T I O N:
==============

If you run the macro (as in the original) it will run my hacked code to re-generate a 1024-button toolbar, complete with blanks. You’ll lose the hours of labour I spent removing the blanks.

The macro works, it’s just that you’ll get a whole lot of gray space you don’t need.

Start of fby View, Toolbars and choose the ShowFaceIds.

Reply | Quote

On this subject – Say I edit an Icon and use it on a button, where is that saved? I want to be able to create a toolbar at startup and use these icons i edited, but faceid of them is 0.
Any ideas?

Reply | Quote

>Say I edit an Icon and use it on a button, where is that saved?
If you edit an icon on the “ShowfaceIds” toolbar and user (right-click) Copy button image and then Paste button image to paste the button into a toolbar within your own workbook, I would imagine that the pasted button image is stored within your own workbook.
Is that what you meant?

Reply | Quote

Erm, not sure.

I right click blank toolbar area and click customise. Then i copy a buttons icon – say the autofilter icon. Then I paste this icon to 3 buttons I have created on a custom toolbar – then I edit these 3 to be different coloured versions of the copied autofilter icon.

when i close the form the toolbar is removed (to prevent it being there in other workbooks), and the toolbar is created each time I open that workbook – but not sure how to assign the icons I edited.

Reply | Quote

(Edited by chrisgreaves on 22-Jan-08 10:28. realised Word. Not excel.)

(oops! Just realised the question was about Word; please standby for corrections …)
This thread might help: post 279,202
If I’ve done this right, the attached Excel97 workbook “ChrisMessage.xls” will have a toolbar “ChrisMessage” with an icon of a scene from Ptarmigan mountain near prince Rupert B.C.
Clicking on the Toolbar button should pop up a message “From the toolbar icon”.

If what I have created is what you are trying to create, then in part the answer to your question must be “The customised icon is stored in the workbook”, since only my workbook has been transmitted to you (via Woody’s Lounge).

Does this help?

Reply | Quote

… what I said a few minutes ago, but in this case the customised icon is in ChrisMessage.doc (attached)

Reply | Quote

Thanks for these Chris.

I am not sure if I can do what I am trying to do. I know that if you save a customised icon with the toolbar with the workbook then this can be done (as your attachments)

Bt I am creating the toolbar on the fly, so it doesnt ‘stay’ in excel.

I have found some default options that I am happy with, so its cool

Reply | Quote

Very simply:

Open the faceid sheet. Right click on the Excel toolbar and select Customize. Move the customize window out of the way but leave it open. Now drap and drop any faceid icon onto any toolbar!

Now, if any one from the VBA forum is lurking, you all can right click on the icon of choice and make note of the faceid number. Use that number in your Commandbar control definition and you’ll get the corresponding icon on your VBA created/modified toolbar. For example:

Dim cBar as Commandbar
Dim barbutton as CommandbarControl
Set barbutton = cBar.Controls.Add(Type:=msoControlButton, ID:=331)

ID 331 is the ‘Close’ icon.

Reply | Quote

Just to add something to Kevin’s suggestion. When you open the faceid.xls worksheet, you will see a dialog box where you can enter two numbers. You can only get 200 buttons at a time, so don’t enter 0 to 1000; you’ll have to try 0 to 200, 201 to 400, etc.

Also, you don’t have to drag & drop. If you open both Word & Excel, you can right click the button of your choice & choose “copy button image”. Then switch to Word & with the customize dialog box open, you can paste the button image.

One thing I’ve been meaning to try is to make a table so I can see all the button images at one time. I might be able to do this by creating a toolbar & dropping all the images on the toolbar; haven’t tried it yet, but I’d like to overcome the limitation of seeing only 200 at a time.

Reply | Quote

For a template that has a toolbar with all of the built-in button icons for Office, (which is not listed on my download page, yet) is at
Button Icons template (zip file)

Within a couple of days it should appear on my download page (http://www.addbalance.com/word/download/).

Reply | Quote

Charles

That is great. I did a little hacking on the code to expand the range of buttons somewhat. Here is the modified code which gives buttons up to the 2000 mark. If you want to go further feel free to mod the 2000 value in the code

Sub Generate_Icon_Lists()
'Based on code from Russell Boyd
'Modified 27FEB01 by Andrew Lockton
Dim oPop As CommandBarPopup, oBut As CommandBarButton
Dim i As Integer, sToolbarName As String
Dim iStart As Integer, iGroup As Integer, iEnd As Integer

CustomizationContext = ActiveDocument.AttachedTemplate
sToolbarName = "Icon Buttons Toolbar"
iStart = 1
iGroup = 100
Do While iStart < 2000
  iEnd = iGroup + iStart - 1
  Set oPop = CommandBars(sToolbarName).Controls.Add(Type:=msoControlPopup)
  oPop.Caption = iStart & "-" & iEnd
  For i = iStart To iEnd
    Set oBut = oPop.Controls.Add(Type:=msoControlButton)
        oBut.Caption = i
        oBut.FaceId = i
  Next i
  iStart = iStart + iGroup
Loop

End Sub

Reply | Quote

I changed the posted template and it now includes all buttons up to 5000 I think. It is on my download page (http://www.addbalance.com/word/download/) if anyone is interested.

Reply | Quote

I just updated instructions when someone else let me know that they couldn’t copy the buttons. I said to load it as a global template. This is necessary, but not sufficient. You also have to open the template to be able to copy the buttons. I don’t know why, but that’s what it takes.

Reply | Quote

Thank you. I found THIS resposne after I’d hacked the Excel sheet to show the first 1000 icons on a rather large toolbar so that i could see every icon all at once and select the best icon for the job-at-hand.

Question1: has anyone found a way to inhibit those icon values for which there is no image?

Question2: is it possible to produce a toolbar that has JUST the images so that one can browse solely for the purpose of copying?

The attached file is my hacked version. Below I paste the very slight coding changes I made: (1) changed the lopop to hard-code to 1000 (2) included a status-bar display (3) changed the dimensions of the toolbar

Function CBShowButtonFaceIDs
(snip!)

'    For intCntr = lngIDStart To lngIDStop
    For intCntr = 0 To 1024
        Set cmdNewButton = cbrNewToolbar.Controls.Add(Type:=msoControlButton)
        With cmdNewButton
            ' Setting the FaceId property value specifies the appearance
            ' but not the functionality of the button.
' Show a running display.
            Application.StatusBar = Str$(intCntr) & " of 1024"
(snip!)
    With cbrNewToolbar
        .Width = 800
        .Left = 50
        .Top = 100
        .Visible = True
    End With
(snip!)

Reply | Quote

Thanks, but how do I copy icons from your Toolbar to any other toolbar?

m.q.

Reply | Quote

TRy this:

When editing a toolbar (in Word View, Toolbars, Customize) right-click ona button and select “Copy” from the popup menu. On another button, right-click and select “Paste”.

Reply | Quote

Does anyone know a way to have access to the toolbar buttons that were in Word 95, without reinstalling Word 95? I thought they were more distinct, but other than installing both versions (95 & 2000), I don’t how to get at them.

Reply | Quote

They MIGHT be lurking around in an icon file. I still make use of MORICONS.DLL from Windows 3.x days when I’m changing cons on desktop shortcuts.

My Fun4X module contains code to search the drives for all *.ICO and experiment with them one at a time. I could drag out the code and perhaps make the icon copyable?

Reply | Quote

I just updated instructions when someone else let me know that they couldn’t copy the buttons. I said to load it as a global template. This is necessary, but not sufficient.

You also have to open the template to be able to copy the buttons. I don’t know why, but that’s what it takes.

Reply | Quote

Go to
http://www.axialis.com/download/

and tell them “Axialis AX-Icons 4.5” sent you!

Reply | Quote

This is a great program that I also use, to copy and create buttons

Reply | Quote