sheets("Sheet1").Unprotect("密码") '对表格 Sheet1 输入密码取消保护sheets("Sheet1").Protect ("密码") '对表格 Sheet1输入密码 加密
sheets("Sheet1").Unprotect "密码" '不用加括号,空格引号密码引号sheets("Sheet1").Protect "密码" '同理