Excel菜单栏和工具栏不见了怎么办
时间:2023-05-05 22:26:41
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中就可以看到工具栏等都又出现了。
![](/images/zang.png)
![](/images/jiucuo.png)
猜你喜欢
excel 中OFFSET函数的用法及应用实战讲解
![](https://img.aspxhome.com/file/2023/7/a163037_0s.gif)
ps中的橡皮擦工具怎么更换图片背景
什么是TF卡 TF卡有什么用
![](https://img.aspxhome.com/file/2023/3/a301341_0s.jpg)
用WPS移动版巧算加权平均值
![](https://img.aspxhome.com/file/2023/9/a164799_0s.png)
WPS 运用表格数据,Word文档里的表格数据如何合计,一起来看看吧!
![](https://img.aspxhome.com/file/2023/6/a186526_0s.jpg)
如何让Win10登录界面不显示某个用户帐户
![](https://img.aspxhome.com/file/2023/30/a263391_0s.jpg)
Excel表格技巧—怎么用DEC2BIN 函数
固态硬盘和普通硬盘的区别在哪?
![](https://img.aspxhome.com/file/2023/6/a325954_0s.jpg)
excel 小数转百分数的方法,主要有设置单元格格式和使用函数公式完成excel小数变百分数
![](https://img.aspxhome.com/file/2023/7/a162377_0s.jpg)
PPT制作完成后如何打包方便播放 视频教程
电脑怎么连接打印机-电脑连接打印机的方法
![](https://img.aspxhome.com/file/2023/3/a293132_0s.png)
使用Word输入平均值符号的方法
![](https://img.aspxhome.com/file/2023/6/22626_0s.jpg)
在Word2007中如何抠除背景色
![](https://img.aspxhome.com/file/2023/4/20624_0s.jpg)
Win7如何获得的最新补丁?Win7获得的最新补丁的方法
![](https://img.aspxhome.com/file/2023/26/a228073_0s.png)
为什么网络不稳定老掉线_路由器为什么网络不稳定解决方法
![](https://img.aspxhome.com/file/2023/2/a290098_0s.jpg)
怎样在wps文字中添加表格
wps表格的数据怎么分类汇总
excel常用函数substitu的使用教程
AutoCAD 2012没有菜单栏怎么办?AutoCAD2012调出菜单栏的的方法
![](https://img.aspxhome.com/file/2023/7/a331287_0s.jpg)
CAD高版本怎么转换成低版本?
![](https://img.aspxhome.com/file/2023/30/a270412_0s.jpg)