獻(xiàn)給今日頭條的朋友們：

常用的屏蔽代碼：

Application.CommandBars(''Worksheet Menu Bar'').Enabled = False ''屏蔽菜單欄

Application.DisplayFormulaBar = False ''屏蔽編輯欄

Application.DisplayStatusBar = False ''屏蔽狀態(tài)欄

下面任選一組即可，不可同時出現(xiàn)。

Application.CommandBars(''Standard'').Visible = False ''屏蔽常用工具欄，右鍵可選

Application.CommandBars(''Formatting'').Visible = False ''屏蔽格式工具欄，右鍵可選

Application.CommandBars(''Standard'').Enabled = False ''去除常用工具欄，右鍵也刪掉

Application.CommandBars(''Formatting'').Enabled = False ''去除格式工具欄，右鍵也刪掉

Application.CommandBars(''Toolbar list'').Enabled = False ''屏蔽右鍵工具欄

Application.CommandBars(''cell'').Enabled = False ''屏蔽單元格右鍵單擊

Application.CommandBars(''Column'').Enabled = False ''屏蔽列右鍵單擊

Application.CommandBars(''Row'').Enabled = False ''屏蔽行右鍵單擊

Application.Assistant.Visible = False ''應(yīng)用程序的輔助的可見

Application.CommandBars.DisableCustomize = True ''去除右鍵工具欄中的“自定義”

ActiveWindow.DisplayHeadings = False ''屏蔽行號列標(biāo)

ActiveWindow.DisplayWorkbookTabs = False ''屏蔽工作表標(biāo)簽

ActiveWindow.DisplayVerticalScrollBar = False ''屏蔽垂直滾動條

ActiveWindow.DisplayHorizontalScrollBar = False ''屏蔽水平滾動條

Application.CommandBars(''ply'').Enabled = False ''屏蔽工作表標(biāo)簽右鍵單擊

Application.CommandBars(''Visual basic'').Enabled = False ''屏蔽應(yīng)用程序的<命令塊>(''Visual basic'' )的激活

Application.OnKey ''%{f11}'', '' '' ''屏蔽組合鍵ALT+F11，%代表ALT

Application.OnKey ''%{F11}'' ''解除屏蔽ALT+F11

Application.OnKey ''%{f8}'', '' '' ''屏蔽組合鍵ALT+F8

Application.OnKey ''%{f8}'' ''解除屏蔽ALT+F8

Application.OnKey ''^{f11}'', ''VBEdit'' ''屏蔽組合鍵Ctrl+F11,插入宏表，^代表Ctrl

Application.OnKey ''^{f11}'' ''恢復(fù)組合鍵Ctrl+F11,插入宏表

Application.OnKey ''^f'', '' '' ''屏蔽組合鍵Ctrl+F，查找

Application.OnKey ''^h'', '' '' ''屏蔽組合鍵Ctrl+H，替換

Application.OnKey ''^{Break}'', '' '' ''屏蔽CTRL+Break中斷

Application.OnKey ''^{Break}'' ''解除CTRL+Break中斷

崋說 簡單傳播