エクセル結合セルのRockedプロパティ

VBAで保護されていないセルにロックをかけようとすると、

「range クラスの locked プロパティを設定できません。」

となってうまくいかなかった。

このエラーメッセージで検索してみると、結構出てきた。

結合セルだから怒られてしまうようで、

Range("a1").MergeArea.Locked = Trueとやればいいようです。

Selection.Locked = Trueってやってみたりしたんですけど結局MergeAreaでした。

それと、保護を有効にするためのProtectも

Protect UserInterfaceOnly:=TrueとするとVBA上からは保護が有効になっていても書き込めるようにできることがわかりました。結構いいです。