Excel菜单栏和工具栏不见了怎么办

Excel

excel是办公一族的必备软件，当你打开excel却发现excle菜单栏和工具栏不见了，那肯定很着急吧？这个问题很多朋友都遇到过，接下来，就为大家介绍一下解决方法。

如下图，菜单栏和工具栏都消失了：

1、打开一个excel文件，按ALT+F11，然后在打开的窗口中点击插入模块，如下图：

把下面的字体复制到对话框中：

Sub aaa()

Dim aa, bb As Boolean

aa = True

bb = False

Application.CommandBars(ply).Enabled = aa

'右键点工作表标签是否可用

Application.CommandBars(cell).Enabled = aa

'右键点单元格是否可用

Application.CommandBars(toolbar list).Enabled = aa

'右键点工具栏及视图-工具栏是否可用

Application.CommandBars(autocalculate).Enabled = aa

'右键点状态栏是否可用

Application.CommandBars(worksheet menu bar).Enabled = aa

Application.CommandBars(1).Enabled = aa

'以上两句的作用都是把菜单取消

Application.CommandBars(2).Enabled = aa

'暂时未知

Application.CommandBars(3).Enabled = aa

'常用工具栏是否可用

Application.CommandBars(3).Controls(3).Enabled = aa

'使常用工具栏中第三个保存是否可用

Application.CommandBars(4).Enabled = aa

'格式工具栏是否可用

Application.CommandBars(5).Enabled = aa

'暂时未知

Application.CommandBars(1).Enabled = aa

'恢复菜单可用

Application.CommandBars(1).Controls(1).Enabled = aa

'使菜单中的文件是否可用

Application.CommandBars(file).Controls(页面设置(U)...).Enabled = aa

'菜单中的文件中的页面设置是否可用

Application.CommandBars(1).Controls(4).Enabled = aa

'菜单中的第四个插入是否可用

Application.CommandBars(1).Controls(4).Caption = victor

'更改名称

Application.CommandBars(1).Reset

'恢复菜单

Application.DisplayFormulaBar = aa

'编辑栏是否显示

Application.DisplayStatusBar = aa

'状态栏是否显示

ActiveWindow.DisplayHeadings = aa

'行号列标是否显示

ActiveWindow.DisplayWorkbookTABS = aa

'工作表标签是否显示

ActiveWindow.DisplayHorizontalScrollBar = aa

'水平滚动条是否显示

ActiveWindow.DisplayVerticalScrollBar = aa

'垂直滚动条是否显示

End Sub

好了，然后按F5，运行宏aaa，然后关闭，回到excel中就可以看到工具栏等都又出现了。