保护只针对工作表的吧，不会只针对某个具体的单元格的
'保护工作表：ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True'撤消保护工作表：ActiveSheet.Unprotect
对此进行录制宏操作就知道了。
