Hvordan fjerne jeg skrivebeskyttelse fra regneark i VBA-kode?

Hej der!

På et givent regneark har jeg i egenskaber markeret at regnearket altid skal åbnes skrivebeskyttet. Herved har jeg mulighed for at dele arket mellem flere brugere, uden at de får at vide at andre benytter arket.

Jeg er nu interesseret i, at i selvsamme ark at lave en vba-kode der kan fjerne skrivebeskyttelsen midlertidigt, mens evt. rettelser indføres, og herefter tilføje skrivebeskyttelsen igen.

Dvs. en enkelt bruger må rette i arket, og for resten af brugerne skal arket åbnes skrivebeskyttet.

Er der nogen der kan hjælpe??

Mvh M