Assuming all my passwords are "abc"

To unprotect my active sheet, I do€¦€¦
ActiveSheet.Unprotect €œabc€�

To unprotect my write protected workbook, I do€¦€¦
Workbooks.Open Filename:=TargetPathAndName, WriteResPassword:= €œabc€�

But to €œunlock for viewing€� in VBE, my module1 under Project Name Book, what
the code like?

Many thanks