ProtectSharing Method Example

This example saves workbook one and protects it for sharing.

Workbooks(1).ProtectForSharing Password:="drowssap", _
    SharingPassword:="gnirahs"