UnprotectSharing Method
Turns off protection for sharing and saves the workbook.
expression.UnprotectSharing(SharingPassword)
expression Required. An expression that returns a Workbook object.
SharingPassword Optional Variant. The workbook password.
Example
This example turns off protection for sharing and saves the active workbook.
ActiveWorkbook.UnprotectSharing Password:="drowssap"