Hi,

For i = 1 To CommandBars.count
If (CommandBars(i).name <> "Right Click Mouse") Then
CommandBars(i).Enabled = False
End If
Next i

I tried to use this code.
However, right click mouse is disable.

How can I disable all menus except the right click mouse option?

Thanks.