Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Highlight a selected toolbar in a menu!
Hello!
I would like to highlight (possibly with a coloured 'tick mark') selected toolbar rom a menu. I.e. any toolbar selected by the user from a menu should be highlighte so that the user can see which ones were selected in the end. I wrot the following macro for the same but can't figure out what'z wrong. ============================================== Sub Macro1() With Application.CommandBars.ActionControl If .State = msoButtonUp Then ActiveWorkbook.Worksheets(.Caption).Visible = xlSheetHidden .State = msoButtonDown Else ActiveWorkbook.Worksheets(.Caption).Visible = xlSheetVisible .State = msoButtonUp End If End With End Sub ============================================== I would appreciate your help guys. Thanks a bunch, best regds. Arun -- Message posted from http://www.ExcelForum.com |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Highlight a selected toolbar in a menu!
you do follow the approach in these articles:
http://support.microsoft.com/?id=161926 XL97: How to Place a Checkmark Next to a Menu Item http://support.microsoft.com/?id=213735 XL2000: How to Place a Check Mark Next to a Custom Menu Item so I guess the question is what is the problem. Saying you can't figure out what is wrong doesn't tell us what results you are getting that don't match your expectations. -- Regards, Tom Ogilvy "aiyer " wrote in message ... Hello! I would like to highlight (possibly with a coloured 'tick mark') a selected toolbar rom a menu. I.e. any toolbar selected by the user from a menu should be highlighted so that the user can see which ones were selected in the end. I wrote the following macro for the same but can't figure out what'z wrong. ============================================== Sub Macro1() With Application.CommandBars.ActionControl If .State = msoButtonUp Then ActiveWorkbook.Worksheets(.Caption).Visible = xlSheetHidden State = msoButtonDown Else ActiveWorkbook.Worksheets(.Caption).Visible = xlSheetVisible State = msoButtonUp End If End With End Sub ============================================== I would appreciate your help guys. Thanks a bunch, best regds. Arun. --- Message posted from http://www.ExcelForum.com/ |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How do I have a cell highlight when selected? | Excel Worksheet Functions | |||
How do I have a cell highlight when selected? | Excel Discussion (Misc queries) | |||
How do I have a cell highlight when selected? | Excel Discussion (Misc queries) | |||
Highlight Row when selected | Excel Discussion (Misc queries) | |||
How do I change the highlight color of selected menu items? | Excel Discussion (Misc queries) |