Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Can you place a combo box in a custom toolbar?
Is is possible to place combo boxes in a toolbar? How is it done? ------------------------------------------------ ~~ Message posted from http://www.ExcelTip.com/ ~~View and post usenet messages directly from http://www.ExcelForum.com/ |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Can you place a combo box in a custom toolbar?
Try something like the following:
Sub Init() Dim Cbx As Office.CommandBarComboBox Set Cbx = Application.CommandBars("Standard").Controls.Add( _ Type:=msoControlComboBox) With Cbx .Caption = "Choose" .Tag = "Combobox1" .AddItem "Item 1" .AddItem "Item 2" .AddItem "Item 3" .OnAction = ThisWorkbook.Name & "!CbxClick" End With End Sub Sub CbxClick() Dim Cbx As Office.CommandBarComboBox Set Cbx = Application.CommandBars.ActionControl MsgBox "You choose: " & Cbx.List(Cbx.ListIndex) End Sub -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "coosk" wrote in message ... Is is possible to place combo boxes in a toolbar? How is it done? ------------------------------------------------ ~~ Message posted from http://www.ExcelTip.com/ ~~View and post usenet messages directly from http://www.ExcelForum.com/ |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Combo Box selection to place $0 into another cell | Excel Discussion (Misc queries) | |||
How do I place font buttons on the Toolbar | Excel Discussion (Misc queries) | |||
"Combo Box - getting control combo box to stick in place in worksh | Excel Discussion (Misc queries) | |||
"Combo Box - getting control combo box to stick in place in worksh | Excel Discussion (Misc queries) | |||
saving toolbar buttons on custom toolbar | Excel Programming |