right click

[Steve davis]

can u disable the right click button in excel

 

[Mike H]

Hi,

Alt+F11 to open VB editor. Double click 'ThisWorkbook' and paste this code
in on the right

Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target
As Range, Cancel As Boolean)
Cancel = True
End Sub
--
Mike

When competing hypotheses are otherwise equal, adopt the hypothesis that
introduces the fewest assumptions while still sufficiently answering the
question.

 

[Steve davis]

high work well thanks
can it be done on the main menu bar were file to help is as well

 

[Mike H]

Hi,

Yes it can, have a look here

http://www.rondebruin.nl/menuid.htm
--
Mike

When competing hypotheses are otherwise equal, adopt the hypothesis that
introduces the fewest assumptions while still sufficiently answering the
question.

 

[Steve davis]

high was hoping could ajust code to do all the things i wont but cant
looked at http://www.rondebruin.nl/menuid.htm
will keep in fav for futher use
but what i need is to stop the extra standard to customize menu poping up
when u right click in the light blue area on the Command bar menu

 

[Steve davis]

finaly found thank
Application.CommandBars("Toolbar List").Enabled = False

 

[Ron de Bruin]

Tip 4 from the page

Disable right clicking on the worksheet menu bar and other bars in 97 SR1 and above.

On Error Resume Next
Application.CommandBars("Toolbar List").Enabled = False
On Error GoTo 0


This prevents users double-clicking on the Toolbar area to open the
(Customize Toolbars) dialog in Excel 2002 and above.
Application.CommandBars.DisableCustomize = True

If you want to remove “Type a question for Help†on the Worksheet Menu Bar you
can use this in Excel 2002 and above. True = hidden and False = visible
Application.CommandBars.DisableAskAQuestionDropdown = True

You can use this to avoid the error in Excel 2000

If Val(Application.Version) > 9 Then
CallByName CommandBars, "DisableCustomize", VbLet, True
CallByName CommandBars, "DisableAskAQuestionDropdown", VbLet, True
End If