マクロを使用して単一のセルをロックする方法（シートを保護しないで）

Question

マクロを実行して特定のセルに自動的に挿入して、マクロの最後のセルに情報をロックして、 。

マクロを使用し、シートを保護せずに単一のセルを保護/ロックする方法はありますか？あなたが興味の単一セルのためのスプレッドシートが保護されていない感じさせるなくするために、私はコメントに持っていたの提案を使用したい場合は

はあなたに

Answer 1

ありがとうございます。

' set cell range you want to be editable. I used a random range here 
Worksheets("yoursheet").Range("A1:G100").Locked = True 
' suppose you want B2 locked 
Worksheets("yoursheet").Cells(2,2).Locked = True 
' protect the sheet 
Worksheets("yoursheet").Protect UserInterfaceOnly:=True, AllowFormattingColumns:=True, AllowFormattingRows:=True