Excel 選單列、工具列、狀態列、編輯列全消失？跑一段 VBA 重置 CommandBars 集合，一鍵恢復完整介面。

修復步驟

1. 開啟任意 Excel 檔，按 Alt+F11 進入 VBE。
2. 「插入」→「模組」，貼入以下代碼：

Sub RestoreUI()
  Dim aa As Boolean: aa = True
  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

3. 按 F5 執行 RestoreUI。
4. 關閉 VBE，回到 Excel，選單列、工具列、狀態列、捲動條、分頁標籤全數恢復。
   

代碼邏輯

逐一啟用各 CommandBar 元件（選單列、工具列、右鍵選單、狀態列等），最後呼叫 CommandBars(1).Reset 重置主選單列至預設狀態，並強制開啟編輯列、狀態列、標題列、分頁標籤、捲動條。

適用版本

Excel 2003/2007/2010（選單列介面）。Ribbon 介面（2010+）若摺疊/隱藏，改用 Ctrl+F1 切換或右鍵功能區「摺疊功能區」取消勾選。