EXCEL工具欄VBA代碼

Application.CommandBars("ply").Enabled = True
右鍵點工做表標籤是否可用
 
 Application.CommandBars("cell").Enabled = True
右鍵點單元格是否可用
 
 Application.CommandBars("toolbar list").Enabled = True
右鍵點工具欄及「視圖」－「工具欄」是否可用
 
 Application.CommandBars("autocalculate").Enabled = True
右鍵點狀態欄是否可用
 
 Application.CommandBars("worksheet menu bar").Enabled = True
 
 Application.CommandBars(1).Enabled = True
以上兩句的做用都是把菜單取消
 
 Application.CommandBars(2).Enabled = True
暫時未知
 
 Application.CommandBars(3).Enabled = True
經常使用工具欄是否可用
 
 Application.CommandBars(3).Controls(3).Enabled = True
使經常使用工具欄中第三個「保存」是否可用
 
 Application.CommandBars(4).Enabled = True
格式工具欄是否可用
 
 Application.CommandBars(5).Enabled = True
暫時未知
 
 Application.CommandBars(1).Enabled = True
恢復菜單可用
 
 Application.CommandBars(1).Controls(1).Enabled = True
使菜單中的「文件」是否可用
 
 Application.CommandBars("file").Controls("頁面設置(&U)...").Enabled = True
菜單中的「文件」中的「頁面設置」是否可用
 
 Application.CommandBars(1).Controls(4).Enabled = True
菜單中的第四個「插入」是否可用
 
 Application.CommandBars(1).Controls(4).Caption = "victor"
更更名稱
 
 Application.CommandBars(1).Reset
恢復菜單
 
 Application.DisplayFormulaBar = True
編輯欄是否顯示
 
 Application.DisplayStatusBar = True
狀態欄是否顯示
 
 ActiveWindow.DisplayHeadings = True
行號列標是否顯示
 
 ActiveWindow.DisplayWorkbookTabs = True
工做表標籤是否顯示
 
 ActiveWindow.DisplayHorizontalScrollBar = True
水平滾動條是否顯示
 
 ActiveWindow.DisplayVerticalScrollBar = True
垂直滾動條是否顯示