ExcelのユーザーフォームでTAB,ENTERが使えなくなる

Question

VBAを使用して、AブックのユーザーフォームからBブックにコントロール移動して、その後、ユザーフォームに戻るとTAB,

ENTERキーが使えなくなります。

Answer 1

( 免責事項：提供された情報は自動翻訳ツールを使用して翻訳されています。正確性を期すよう努めておりますが、翻訳が必ずしも元のコンテンツの意味、文脈、意図を完全に反映しているとは限りません。）

---

こんにちは。Ken

これは、ブックBを操作したあとにユーザーフォームへフォーカスが正しく戻っていない可能性が高いです。フォームが選択されているように見えても、Excel側がキー入力を保持し、TabやEnterを処理できなくなる場合があります。

以下をお試しください。

まず、コード内に Application.Interactive = False、Application.OnKey、または SendKeys がないか確認します。Interactive = False はキーボードとマウス入力をブロックするため、エラー時を含めて必ず True に戻す必要があります。詳しくは Application.Interactive プロパティ をご確認ください。

ブックBの処理後に、次のコードを追加してみてください。

Application.Interactive = True
Application.OnKey "{TAB}"
Application.OnKey "{ENTER}"

ThisWorkbook.Activate
DoEvents
UserForm1.TextBox1.SetFocus

TextBox1 は、入力を戻したいコントロール名に置き換えます。そのコントロールの Enabled と TabStop も True にしてください。

フォームを開いたままブックBを操作する必要がある場合は、次のようにモードレス表示にすることも推奨します。

UserForm1.Show vbModeless

お役に立てれば幸いです。さらにサポートが必要な場合は、お気軽にご連絡ください。 

---

この回答が参考になった場合は、「回答を受け入れる」をクリックし、高評価をお願いします。この回答について追加の質問がある場合は、「コメント」をクリックしてください。 

注：このスレッドに関連するメール通知を受け取りたい場合は、[当社のドキュメント]に記載の手順に従ってメール通知を有効にしてください。