EXCEL工作表的全部保护与解除

MicrosoftExcel工作表的保护与解除郝燕龙1，编制宏定义（1）点击：工具-宏-VisualBasic编辑器，如下图：（2）在打开的VisualBasic编辑器中点击：ThisWorkbook,在右边编辑框中加入如下代码,完成宏定义的编制。关闭VisualBasic编辑器。结果如下图：SubProtectAll()DimshAsWorksheetForEachshInWorksheetssh.Protect123'这里设置要保护的密码NextEndSubSubUnProtectAll()DimshAsWorksheetForEachshInWorksheetssh.Unprotect123'这里设置解除保护的密码，必须与保护密码一致NextEndSub2，使用宏定义点击EXCEL软件：工具-宏-宏，如下图：弹出如下面板：选择TishWorkbook.ProtectAll,点右边执行按钮，则所有sheet表格被保护，密码为代码中密码（本例为123）。选择TishWorkbook.UnProtectAll,点击右边执行按钮，则所有sheet表格解除保护。