关闭共享保护功能并保存工作簿。
expression.UnprotectSharing(SharingPassword)
expression 必需。该表达式返回一个 Workbook 对象。
SharingPassword Variant 类型,可选。指定工作簿密码。
本示例关闭共享保护,并保存当前活动工作簿。
ActiveWorkbook.UnprotectSharing Password:="drowssap"