Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Custom toolbar's name
Excel 2003
How can I programatically identify the name of an active (Visible) custom toolbar. donwb |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Custom toolbar's name
On the not quite sure assumption that the ID of all custom toolbars is 1 -
Sub test3() Dim i As Long Dim s As String Dim cbr As CommandBar s = "Visible Custom Toolbars - " & vbCr For Each cbr In Application.CommandBars If cbr.ID = 1 And cbr.Visible Then i = i + 1 s = s & cbr.Name & vbCr End If Next s = s & "Count = " & i MsgBox s End Sub Regards, Peter T "donwb" wrote in message ... Excel 2003 How can I programatically identify the name of an active (Visible) custom toolbar. donwb |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Custom toolbar's name
Many thanks Peter - that works fine.
"Peter T" <peter_t@discussions wrote in message ... On the not quite sure assumption that the ID of all custom toolbars is 1 - Sub test3() Dim i As Long Dim s As String Dim cbr As CommandBar s = "Visible Custom Toolbars - " & vbCr For Each cbr In Application.CommandBars If cbr.ID = 1 And cbr.Visible Then i = i + 1 s = s & cbr.Name & vbCr End If Next s = s & "Count = " & i MsgBox s End Sub Regards, Peter T "donwb" wrote in message ... Excel 2003 How can I programatically identify the name of an active (Visible) custom toolbar. donwb |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
how to limit custom toolbar's display | Excel Programming | |||
Adding custom list and text boxes to the custom tool bar from Excel C API | Excel Discussion (Misc queries) | |||
Adding custom list and text boxes to the custom tool bar from Excel C API | Excel Programming | |||
How to delete rows when List toolbar's "delete" isnt highlighted? | Excel Worksheet Functions | |||
Toolbar's shape remains on the screen | Excel Programming |