技術員聯盟提供win764位系統下載,win10,win7,xp,裝機純凈版,64位旗艦版,綠色軟件,免費軟件下載基地!

當前位置:主頁 > 教程 > 軟件教程 > Excel教程 >

Excel菜單欄和工具欄不見了怎么辦

來源:技術員聯盟┆發(fā)布時間:2019-04-30 12:14┆點擊:

  Excel是辦公一族的必備軟件,當你打開Excel卻發(fā)現excle菜單欄和工具欄不見了,那肯定很著急吧?這個問題很多朋友都遇到過,接下來,就為大家介紹一下解決方法。

Excel菜單欄和工具欄不見了怎么辦 三聯

  如下圖,菜單欄和工具欄都消失了:

Excel菜單欄和工具欄不見了怎么辦2

  1、打開一個excel文件,按ALT+F11,然后在打開的窗口中點擊插入——模塊,如下圖:

Excel菜單欄和工具欄不見了怎么辦3

  把下面的字體復制到對話框中:

  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

  '右鍵點狀態(tài)欄是否可用

  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

  '狀態(tài)欄是否顯示

  ActiveWindow.DisplayHeadings = aa

  '行號列標是否顯示

  ActiveWindow.DisplayWorkbookTabs = aa

  '工作表標簽是否顯示

  ActiveWindow.DisplayHorizontalScrollBar = aa

  '水平滾動條是否顯示

  ActiveWindow.DisplayVerticalScrollBar = aa

  '垂直滾動條是否顯示

  End Sub

Excel菜單欄和工具欄不見了怎么辦5

  好了,然后按F5,運行宏aaa,然后關閉,回到excel中就可以看到工具欄等都又出現了。

Excel菜單欄和工具欄不見了怎么辦4