|
ユーザーフォームが二つあります。
UserForm1,UserForm2
UserForm1にはTextBox1があります。
UserForm2にはCommandButton1があります。
UserForm1のTextBox1に、最初の文字が "z" と入力されると、UserForm1を消し、UserForm2を表示させます。
UserForm2でCommandButton1をクリックすると、UserForm1のTextBox1の値を消し、UserForm2を消し、UserForm1を表示させます。
私のコードを下記に記します。
Private Sub TextBox1_Change()
If TextBox1.Value = "z" Then
Unload Me
UserForm2.Show
End If
End Sub
Private Sub CommandButton1_Click()
Unload Me
UserForm1.Show
End Sub
ところがUserForm2から戻ったUserForm1のTextBox1に文字 "z" を入れても、イベントが発生しません。
間違えを厳しく指摘してください。
|
|