Jasně, že jsem to zkoušel, nakonec jsem vygooglil tohle a to pomohlo.
Sub Enable_All_Right_Click_Menus()
'This will enable all BuiltIn Command bars
Dim Cbar As CommandBar
For Each Cbar In Application.CommandBars
Cbar.Enabled = True
Next
End Sub citovat