VBA to make a workbook Shared upon opening
 

I have a shared workbook that I need to work on from time to time. In
order to do this I have to unshare the workbook. Sometimes I forget to
share it again though. Is there a code I could use that would make the
workbook shared everytime that I open the workbook?