Excel2013VBAユーザーフォーム終了後にセルへの値入力ができない現象

Question

Excel2013のVBAについてです。

ユーザーフォーム終了後にセルへの値の入力ができない現象が発生します。

１．シート上のボタンにてユーザーフォーム呼び出し。

２．ユーザーフォームのボタンにて、

　　　　・ボタンの色変更

　　　　・特定シートへの値入力（With　.Range.Valueにて入力）

　　　　・特定シートへの移動（Sheets.Select、Range.Select）

３．ユーザーフォームを閉じる。

この後に、セルに値を入力すると、数式バーには値が表示されるものの、

セルには値が入力されません。

セルのロックを使用しているため、Enterキーでロックされていないセルに飛ぶのですが、

ロックしてあるはずのセルが選択されます。（値は入力できません。）

同じ現象にあった方などいらっしゃいましたら、回答をお願いします。

Answer 1

↓と同じ現象のような気がしますが、どうでしょうか？

http://answers.microsoft.com/ja-jp/office/forum/office\_2013\_release-excel/%e3%82%a8%e3%82%af%e3%82%bb%e3%83%ab2013%e3%81%a7/dab88bf1-ed9a-46ba-8814-2619a5d29c34

Answer 2

返信有難うございます。

リンク先を確認したところ、同様の現象であることがわかりました。

非常に助かりました。ありがとうございました。

Answer 3

シート保護したりセルロック解除したりすることが無いので

トラブル経験がなく、見当違いでしたらすみません。

  シート保護をしていて、それを解除するときに

何もいじっていなければ

どのセルでも選択できる状態になっています。

  ActiveSheet.EnableSelection = xlNoRestrictions

　　（この状態です。）

ロック解除したセルだけ選択できるようにするには

        ActiveSheet.EnableSelection = xlUnlockedCells

の状態にしておかないといけません。