Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3
Default Custom toolbar - how to save in file and show on demand?

What I want:
- create a custom toolbar with some buttons, attach macros to the
buttons and save the whole thing in an .xls file.
- to be able to use the file with my program (does excel automation),
i.e. programmatically open the file and display the toolbar, but only
when I say so.

What happens: I open a file, create a toolbar, buttons, macros and
save the file, e.g. Toolbars.xls, close Excel. Then whenever I open
Excel with ANY file, the darned thing appears. Attach or no attach -
doesn't matter. When I copy Toolbars.xls to another machine and open
it, the toolbar appears but w/o any buttons. After that this empty
toolbar appears when I open ANY file on that machine.

This behaviour is nonsensical and counterintuitive. I did a similar
thing with Word and it all worked as expected, i.e. I saved macros and
buttons a Toolbars.doc file, then opened it whenever I wanted and
attached it to whichever doc file I wanted on any computer. And it
didn't just show up on its own.

The help file is of no help.

It's Excel 2000/97, but I'll need it with any Excel 97+

Please help!

Thanks

----

Igor
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3
Default Custom toolbar - how to save in file and show on demand?

On May 5, 9:40 am, wrote:
What I want:


[...]

Note: I have no problem with creating/deleting a toolbar and buttons
and attaching macros programmatically on the fly. So this would solve
most of the problem, but there seems to be no way to put custom images
on buttons.

---
Igor
  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 35,218
Default Custom toolbar - how to save in file and show on demand?

For additions to the worksheet menu bar, I really like the way John Walkenbach
does it in his menumaker workbook:
http://j-walk.com/ss/excel/tips/tip53.htm

Here's how I do it when I want a toolbar:
http://www.contextures.com/xlToolbar02.html
(from Debra Dalgleish's site)

And if you use xl2007:

If you want to learn about modifying the ribbon, you can start at Ron de Bruin's
site:
http://www.rondebruin.nl/ribbon.htm
http://www.rondebruin.nl/qat.htm -- For macros for all workbooks (saved as an
addin)
or
http://www.rondebruin.nl/2007addin.htm

In xl2007, those toolbars and menu modifications will show up under the addins.

===========

Here's a modified version of the toolbar code from Debra Dalgleish's site.
You'll have to add a worksheet with the pictures on it. (Hide that worksheet
later???)

Option Explicit
Public Const ToolBarName As String = "MyToolbarName"
Sub Auto_Open()
Call CreateMenubar
End Sub
Sub Auto_Close()
Call RemoveMenubar
End Sub
Sub RemoveMenubar()
On Error Resume Next
Application.CommandBars(ToolBarName).Delete
On Error GoTo 0
End Sub
Sub CreateMenubar()

Dim iCtr As Long

Dim MacNames As Variant
Dim CapNames As Variant
Dim TipText As Variant
Dim PictNames As Variant
Dim PictWks As Worksheet

Call RemoveMenubar

MacNames = Array("aaa", _
"bbb")

CapNames = Array("AAA Caption", _
"BBB Caption")

TipText = Array("AAA tip", _
"BBB tip")

PictNames = Array("Pic1", "Pic2")

Set PictWks = ThisWorkbook.Worksheets("Pictures")

With Application.CommandBars.Add
.Name = ToolBarName
.Left = 200
.Top = 200
.Protection = msoBarNoProtection
.Visible = True
.Position = msoBarFloating

For iCtr = LBound(MacNames) To UBound(MacNames)
PictWks.Pictures(PictNames(iCtr)).Copy
With .Controls.Add(Type:=msoControlButton)
.OnAction = "'" & ThisWorkbook.Name & "'!" & MacNames(iCtr)
.Caption = CapNames(iCtr)
.Style = msoButtonIconAndCaption
.PasteFace
.TooltipText = tip_text(iCtr)
End With
Next iCtr

End With
End Sub
Sub AAA()
MsgBox "aaa"
End Sub
Sub BBB()
MsgBox "bbb"
End Sub


wrote:

On May 5, 9:40 am, wrote:
What I want:


[...]

Note: I have no problem with creating/deleting a toolbar and buttons
and attaching macros programmatically on the fly. So this would solve
most of the problem, but there seems to be no way to put custom images
on buttons.

---
Igor


--

Dave Peterson
  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3
Default Custom toolbar - how to save in file and show on demand?


On May 5, 11:11 am, Dave Peterson wrote:

[snip]

Thanks for the example Dave (and thanks go to the original author(s)
as well)!

The trick with using pictures from a worksheet is neat. I couldn't
find a way in Excel to fill in the clipboard with a file contents for
further use in PasteFace, so I was planning to do it outside (the main
application is in Delphi where I can easily paste an image to the
clipboard). This may simplify my code a bit.

Regardless, the toolbar behaviour in Excel is completely weird.
-------
Igor

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
On custom toolbar, how to save macro link to flashdrive ? John Nelson Excel Discussion (Misc queries) 1 February 10th 09 10:49 PM
Save Macro and Custom Toolbar in Worksheet Pat Excel Discussion (Misc queries) 1 April 24th 08 04:12 AM
Show Custom Toolbar on open NikkiB Excel Discussion (Misc queries) 2 September 5th 07 09:30 PM
How do I save a custom toolbar? Art Kaufman Excel Discussion (Misc queries) 4 April 3rd 05 08:13 PM
Cannot Get Caption to show on custom toolbar button Rob Bovey Excel Programming 1 August 1st 03 02:38 AM


All times are GMT +1. The time now is 04:08 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"