Excel VBA - UserForm Textboxにフォーカスを設定できません

Question

ExcelにVBA Userformがあります。これには6つのテキストボックスがあり、TabStopをTrueに設定したUserformの唯一のコントロールです。

テキストボックスをタブで移動しても問題なく移動できます。私はSetFocusをTextbox間を移動するときに起動するイベントで動作させることはできません。私はCommandButtonをUserform16.Textbox1.Setfocusでuserformに配置することができ、期待どおりに動作し、Textbox1にフォーカスを移動します。

TextBox2が入力されているときに、TextBox1をTextBox1に戻すように単純なテストイベントを設定しました（下記参照）、TextBox1からタブアウトしたときに実際にフォーカスがTextbox3に移動します。

Private Sub TextBox2_Enter() 
    Cancel = True 
    UserForm16.TextBox1.SetFocus 
End Sub 

上記で Stopを置くことによって、私は予想通り、イベントが発火していることがわかりますが、それは私が焦点に次のコントロールを制御することはできません。

サブ内のCancel = Trueステートメントの有無にかかわらず同じ結果が得られます。

あなたは頭を壁に打ちつけることによって学びます。ノッキングとグーグルの日の後、私はより高いプログラミング知性に夢中になります。

スタン

Answer 1

私はTextBox2をを入力するとテキストボックスがをTextBox1までバックフォーカスを移動するための簡単なテストイベント（下記参照）を設定するときのTextBox1のうちI]タブ、それは実際にTextbox3にフォーカスを移動します。

_Enter()イベントの別のコントロールにフォーカスを設定することはできません。あなたは、コードを持っているコントロールにフォーカスを移動しますしようとした場合例えばTabIndex

次

は、あなたがこのコードを持っている場合は、ここで、次のTabIndex

TextBox1 (TabIndex 0) 
TextBox2 (TabIndex 1) 
TextBox3 (TabIndex 3) 
TextBox4 (TabIndex 4) 
TextBox5 (TabIndex 2) 

で5つのテキストボックスを持っているとしましょう

Private Sub TextBox2_Enter() 
    TextBox3.SetFocus 
End Sub 

あなたがからTABを押した瞬間の場合は、TabIndexがあるため、フォーカスはTextBox5（TextBox3ではなく）に移動します。

それは_Enter()の引数ではありませんので、それは言うPrivate Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)

であるようにもCancel = Trueは何の効果もありません編集

ところで、唯一の時間は、フォーカスがあなたにTextbox1に戻ってきますシナリオは、フォームにTextBoxesが2つしかない場合です。