ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   context menu (https://www.excelbanter.com/excel-programming/297705-context-menu.html)

eric23

context menu
 
hi!
can anyone get me started on how to add/remove items from right click menu
(via vb.net or vba? )

thanks - eric



Bob Phillips[_6_]

context menu
 
Eric,

An example disabling Insert Comment

With Application.CommandBars("Cell")
.Controls("Insert Comment").Enabled = False
End With

and this adds a command

With Application.CommandBars("Cell")
With .Controls.Add(Type:=msoControlButton, temporary:=True)
.BeginGroup = True
.Caption = "Insert Date"
.OnAction = "myDateMacro"
End With
End With

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"eric23" wrote in message
...
hi!
can anyone get me started on how to add/remove items from right click

menu
(via vb.net or vba? )

thanks - eric





eric23

context menu
 
wow
thanks Bob!

"Bob Phillips" wrote in message
...
Eric,

An example disabling Insert Comment

With Application.CommandBars("Cell")
.Controls("Insert Comment").Enabled = False
End With

and this adds a command

With Application.CommandBars("Cell")
With .Controls.Add(Type:=msoControlButton, temporary:=True)
.BeginGroup = True
.Caption = "Insert Date"
.OnAction = "myDateMacro"
End With
End With

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"eric23" wrote in message
...
hi!
can anyone get me started on how to add/remove items from right click

menu
(via vb.net or vba? )

thanks - eric







Bob Phillips[_6_]

context menu
 
It's a pleasure.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"eric23" wrote in message
...
wow
thanks Bob!

"Bob Phillips" wrote in message
...
Eric,

An example disabling Insert Comment

With Application.CommandBars("Cell")
.Controls("Insert Comment").Enabled = False
End With

and this adds a command

With Application.CommandBars("Cell")
With .Controls.Add(Type:=msoControlButton, temporary:=True)
.BeginGroup = True
.Caption = "Insert Date"
.OnAction = "myDateMacro"
End With
End With

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"eric23" wrote in message
...
hi!
can anyone get me started on how to add/remove items from right click

menu
(via vb.net or vba? )

thanks - eric










All times are GMT +1. The time now is 10:30 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com