本示例取消当前活动工作簿的保护。
ActiveWorkbook.Unprotect