Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Custom Right Click Menus - Inconsistent Functionality
I have an Excel Workbook with customized, context sensitive, right
click options. This Workbook is widely distributed to my colleagues, and I have run into an issue on one computer so far. While the right click options that I'm adding work perfectly fine on every other machine so far, one computer simply does not display them. I have checked the library references in the Excel Workbook, and none of the required libararies appear to be missing or de-selected on this system. I have tried re-installing the MSO.DLL file (Microsoft Office 11.0 Object Library) but this didn't solve the problem either. All of our systems are running Windows XP with Office 2003. If anyone has seen an issue like this or has any ideas, your comments are appreciated. Below is a section of the code I am using to create the custom right click options: Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean) Dim cBut As CommandBarButton On Error Resume Next For i = 4 To 1 Step -1 If Application.CommandBars("Cell").Controls(i).BuiltI n = False Then Application.CommandBars("Cell").Controls(i).Delete End If Next i If ActiveSheet.Index = 2 And ActiveCell.Column = 4 Then Set cBut = Application.CommandBars("Cell").Controls.Add(Befor e:=1, Temporary:=True) With cBut If ActiveCell.Font.Bold = False Then .Caption = "Lock Date" Else .Caption = "Unlock Date" End If .BeginGroup = True .Style = msoButtonCaption .OnAction = "Module6.LockSelection" If ActiveCell.Text < "" And ActiveCell.Row <= LastRow Then .Enabled = True Else .Enabled = False End If End With ... |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
Custom Right Click Menus - Inconsistent Functionality
See response to your question in public.excel.programming.
-- Jim Cone San Francisco, USA http://www.realezsites.com/bus/primitivesoftware "Lee" wrote in message I have an Excel Workbook with customized, context sensitive, right click options. This Workbook is widely distributed to my colleagues, and I have run into an issue on one computer so far. While the right click options that I'm adding work perfectly fine on every other machine so far, one computer simply does not display them. I have checked the library references in the Excel Workbook, and none of the required libararies appear to be missing or de-selected on this system. I have tried re-installing the MSO.DLL file (Microsoft Office 11.0 Object Library) but this didn't solve the problem either. All of our systems are running Windows XP with Office 2003. If anyone has seen an issue like this or has any ideas, your comments are appreciated. Below is a section of the code I am using to create the custom right click options: Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean) Dim cBut As CommandBarButton On Error Resume Next For i = 4 To 1 Step -1 If Application.CommandBars("Cell").Controls(i).BuiltI n = False Then Application.CommandBars("Cell").Controls(i).Delete End If Next i If ActiveSheet.Index = 2 And ActiveCell.Column = 4 Then Set cBut = Application.CommandBars("Cell").Controls.Add(Befor e:=1, Temporary:=True) With cBut If ActiveCell.Font.Bold = False Then .Caption = "Lock Date" Else .Caption = "Unlock Date" End If .BeginGroup = True .Style = msoButtonCaption .OnAction = "Module6.LockSelection" If ActiveCell.Text < "" And ActiveCell.Row <= LastRow Then .Enabled = True Else .Enabled = False End If End With ... |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Custom Menu's | Excel Discussion (Misc queries) | |||
Xfer of XL95 custom menus into XL97 | Excel Worksheet Functions | |||
Editing XL95 custom menus with XL97 | Excel Worksheet Functions | |||
Custom Menus and Macros | Excel Discussion (Misc queries) | |||
Copy Excel Custom Menus to New Computer | Excel Discussion (Misc queries) |