Protect and share : Workbook Share « Excel « VBA / Excel / Access / Word






Protect and share

 

Sub ProtectAndShare()
    Dim wb As Workbook
    Set wb = ThisWorkbook
    wb.ProtectSharing "\\public\shared.xls", "pass1", "pass2", , , "pass3"
End Sub

 








Related examples in the same category

1.Remove sharing
2.Is Workbook Open