У одного из клиентов на рабочей станции под управлением лицензионной Windows 7 x64
Professional, с установленным Microsoft Office 2013 x86 Standart, в Excel перестало
отображаться контекстное меню. Причём вчера работало, а сегодня, не перезагружая
компьютер и неустанавливая никаких дополнительных программ, либо обновлений
Windows\Office не работает. Откат системы на два дня назад и на неделю не дал
никаких результатов. Запуск Excel в безопасном режиме (запуск из пуска с нажатой
кнопкой Ctrl) даёт 100% результат - программа отображает контекстное меню в любом
документе. Но, так как постоянно запускать с Ctrl`ом не удобно, нашлось решение на
форуме.

Алгоритм следующий:

1) Открыть новую книгу 
2) Alt+F11 
3) Ctrl+R 
4) меню Insert - Module 

5) в открывшееся белое окно вставить

Sub Reset_All_Bars() 
Dim cmbComBar As CommandBar 
On Error Resume Next 
For Each cmbComBar In CommandBars 
cmbComBar.Reset: cmbComBar.Enabled = True': cmbComBar.Visible = True 
Next cmbComBar 
End Sub 

 

6) поставить курсор внутри кода (например, в начало текста и нажать кнопку F5 

7) закрыть редактор VBA и попробовать открыть контекстное меню.

 

Спасибо Pavel55 и The_Prist