UnprotectSharing Method Example
This example turns off protection for sharing and saves the active workbook.
ActiveWorkbook.UnprotectSharing Password:="drowssap"