enable right click

[tommy_gtr]

hello,

I use the following code to hide all command bars in my excel file:
Private Sub Workbook_Open()

Dim oCB As CommandBar
For Each oCB In Application.CommandBars
oCB.Enabled = False 'here to change
Next oCB

mFormulaBar = Application.DisplayFormulaBar
Application.DisplayFormulaBar = False
End Sub

but it also disable a mouse right click.

Can anyone help how to enable right click when other command bars are
hide.

thanks a lot

tommy

 

[Norman Jones]

Hi Tommy,

Try:

Application.CommandBars("Cell").Enabled = True

 

[tommy_gtr]

great ))

it works ...

Thank you


tommy