UnProtectSharing Method of Workbook Object VBA

When shared workbook has protected, if you want to do any modifications we need to unshared and unprotect workbook at the beginning of the procedure to do any changes to the workbook. If you forgot the password, you cannot unshared or unprotect the workbook.



50+ Project Management Templates Pack
Excel PowerPoint Word

Advanced Project Plan & Portfolio Template
Excel Template

Business Presentations Templates Pack
PowerPoint Slides

20+ Excel Project Management Pack
Excel Templates

20+ PowerPoint Project Management Pack
PowerPoint Templates

10+ MS Word Project Management Pack
Word Templates

Why we need to UnProtectSharing a Workbook using VBA?

If workbook is shared and protected with password to do any modifications like edit, move and change first we have to unprotect sharing workbook and unprotect workbook then only user can do any modifications in the workbook. We cannot protect or unprotect workbook when a workbook is shared.

VBA UnProtectSharing Workbook – Syntax

Here is the syntax to UnprotectSharing workbook using VBA.

Workbooks(“Your Workbook Name”).UnprotectSharing(


Password: Its Optional argument. It specifies a case sensitive password for the workbook. When you want to unprotect your protected workbook you must specify your password. In the above syntax we are using ‘UnprotectSharing’ method of workbook object to unshare the workbook.

VBA UnProtectSharing Workbook:Example 1

Please find the below example, It will show you how to Unprotect workbook from sharing.

Sub Unprotect_Sheet()
ActiveWorkbook.UnprotectSharing “YourPassword”
End Sub

In the above example we are unprotecting sharing the workbook by using ‘UnprotectSharing’ method of Workbook object in the active workbook. When working with workbook if it has password protected and shared, if you want to do any changes in the code first you have to unshared and unprotect the password at the beginning of the procedure.

VBA UnProtectSharing Workbook – Instructions

Please follow the below step by step instructions to execute the above mentioned VBA macros or codes:

  1. Open an Excel Workbook
  2. Press Alt+F11 to Open VBA Editor
  3. Insert a Module from Insert Menu
  4. Copy the above code for activating a range and Paste in the code window(VBA Editor)
  5. Save the file as macro enabled workbook
  6. Press ‘F5’ to run it or Keep Pressing ‘F8’ to debug the code line by line.

Leave A Comment

Related pages

excel function sumifexcel 2007 graph tutorialdynamic chart excelhow to learn excel vbaunprotect all sheets excelexcel vba lookup valuedml dclsumif examplesunprotect excel sheet 2007hide tabs in excel3d pie chart excelhow to add developer tab to ribbon in wordcreate button vbamacro password exceladvanced excel vlookupmicrosoft excel vba referencesql query excel vbavba delete a filecase excel vbaexcel estimate template constructionhypertext link codeexcel 2007 protect workbookfso file existsif statements on excelmso file viewermerge tabs excelvba select a workbookexcel shotcutcopy values vbahow to unhide sheets in excel 2007unhiding column avba close workbookrecord macro powerpoint 2007interview questions asked in genpact for financeunhide excel rowsvlook functionmerging rows in excelvba multiplicationrun access macro from excelexcel macro rename fileunprotect cells in excelexport access query to excel vbarows count in vbaelse vbaexcel 2007 remove hyperlinksvba custom message boxshortcut keys excel 2007vba write to text filepivot table on excel 2010define macros in excelwhat is the vlookup functionauto save excel 2010checkboxes in excel 2007cell function worksheetexcel worksheet propertiesvba combobox exampleexcel 2007 chart templateshow to insert developer tab in excel 2010excel formulas shortcutsexcel vba dropdownexcel bubble chartsspss video tutorials for beginnersvlookup excel examplescolorindex vbaadvanced filter excel unique recordsproject budget template excelexcel protected worksheetexcel vba averageexcel 2010 sumif exampleautofilter in vbausing excel formulas in vbacombining chart types in excelhow to use iferror function in excel 2010