Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
I would appreciate some help with this.
I want to replace one of the command buttons with a dropdown control with several menu items each of which could have an onAction property. Here is what I am starting with. Any assistance and a bit of code would be greatly appreciated. Sub OpenCommandBar() Dim cb As CommandBar Dim cbb As CommandBarButton Set cb = Application.CommandBars.Add("Dashboard Controls", _ msoBarFloating, False, True) cb.Enabled = True cb.Visible = True Set cbb = cb.Controls.Add(msoControlButton) cbb.Style = msoButtonIconAndCaption cbb.Caption = "Refresh Data" cbb.FaceId = 159 cbb.OnAction = "InitializeDataInput2" Set cbb = cb.Controls.Add(msoControlButton) cbb.Style = msoButtonIconAndCaption cbb.Caption = "Generate Reports" cbb.FaceId = 433 cbb.OnAction = "ProcessReportSet01" Set cbb = cb.Controls.Add(msoControlButton) cbb.Style = msoButtonIconAndCaption cbb.Caption = "Print Reports" cbb.FaceId = 4 cbb.OnAction = "PrintSet01" Set cbb = cb.Controls.Add(msoControlButton) cbb.Style = msoButtonIconAndCaption cbb.Caption = "eMail Reports" cbb.FaceId = 258 cbb.OnAction = "CreateAndEmailReports" End Sub |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
See your third post.
|
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
addding/omitting "x" | Excel Worksheet Functions | |||
Adding a Dropdown Control to a Command Bar | Excel Programming | |||
I can not find the list command from the data dropdown menu? | Excel Worksheet Functions | |||
Addding a Random number to a fixed number..... | Excel Discussion (Misc queries) | |||
Addding a combobox to a workbook? | Excel Programming |