
シートを保護する方法は複数あります!

ここでは私が1番シンプルと考える方法を
記載します!

シートの
・保護はメソッド「Protect」
・保護の解除はメソッド「Unprotect」
で実現できます!

ここではパスワードを使用する例を
記載します!
シートの保護をする
シート「sample」の保護をします。
ここでは保護をする際のパスワードとして、「password123」を設定します。
Sub sheetProtectSample()
'シートを保護する
Worksheets("sample").Protect Password:="password123"
End Sub
上記を実行後にシート「sample」の変更を試みると、変更不可である旨が表示されます。

シートの保護を解除する
シート「sample」の保護の解除をします。
ここでは保護を解除する際のパスワードとして、「password123」を指定します。
Sub sheetUnProtectSample()
'シートの保護を解除する
Worksheets("sample").Unprotect Password:="password123"
End Sub
上記を実行後にシート「sample」の変更を試みると、問題無く変更できます。

備考
ブックの保護/保護の解除については、以下の記事で紹介しています。