学习啦>学习电脑>工具软件>办公软件学习>Excel教程>Excel表格>

2003excel表格菜单栏不见了怎么办

嘉铭分享

  Excel是办公一族的必备软件,当你打开Excel却发现excle菜单栏和工具栏不见了,那肯定很着急吧?这个问题很多朋友都遇到过,下面让学习啦小编为你带来2003excel表格菜单栏不见了的解决方法。

  2003excel表格菜单栏显示步骤:

  如下图,菜单栏和工具栏都消失了:

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

关于2003excel表格菜单栏不见了的相关文章推荐:

1.excel2003编辑栏消失的解决教程

2.excel2003工具栏不见解决教程

3.excel表格工具栏不见的解决教程

    1458723