excel菜单栏不见了工具栏不见了怎么处理

excel

1个回答

写回答

鹰夫人

2025-12-21 12:45

+ 关注

excel
excel

  解决方法:  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中就可以看到工具栏等都又出现了。

举报有用(0分享收藏

Copyright © 2025 IZhiDa.com All Rights Reserved.

知答 版权所有 粤ICP备2023042255号