Userform1のソースコードでUserform2のボタンを押した時・・・というIF文を作りたいです。

Question

Userform1とUserform2があるとして、
Userform1のソース上（？処理などを記載しているマクロ）で、
Userform2の【yes】というボタンをクリックした時のIF文の処理を書きたいのですが、うまくいきません。

下記では違うのでしょうか？

If Form_UserForm2.yes_Click Then

追記
下記のようにも試しましたがうまくいきませんでした。

ユーザーフォーム1の記述

Dim userform2_hantei As Integer

userform2_hantei = 0
Call userform2_hantei()
If userform2_hantei = 1 Then
処理
ElseIf

End Sub

ユーザーフォーム2の記述

Function userform2_hantei(userform2_hantei As Integer)

If yes_Click Then
 userform2_hantei = 1
ElseIf

End Function

Answer 1

VBAはイベントドリブンな言語です。
つまり何か事象が発生したときに定義してあるイベント関数が呼ばれることで動作を続けます。
事象とは「ボタンをクリックしたとき」「フォームを開いたとき」などのことです。
よってご提示のコードはそもそもの前提条件から外れた作りになっています。
またイベント関数はそれぞれのフォームごとにそのフォーム内で発生するイベントを定義します。
UserForm1でUserForm2のイベントを受け取ることはできません。
今回の質問は少々仕様が曖昧ですが、次のどちらかになると思われます。

• UserForm1にあるボタンを押したら、UserForm2にあるボタンの処理を呼び出す
• UserForm1の何かの処理中に、UserForm2にあるボタンの処理を呼び出す

いずれの場合でもUserForm2に外部フォームからも呼び出せる共通関数を作り、UserForm1から呼び出すことで実現できます。

UserForm2

' ボタンクリック時の共通関数。Public にする
Public Sub Button1_Click_Common()
    ' 処理
End Sub

' ボタンクリックイベント
Private Sub Button1_Click()
    ' 共通関数を呼ぶ
    Call Button_Click_Common()
End Sub

UserForm1（ここで定義しているイベントは例です）

' ボタンクリックイベント
Private Sub Button1_Click()
    ' 共通関数を呼ぶ
    Call UserForm1.Button_Click_Common()
End Sub

' フォーム初期化イベント
Private Sub UserForm_Initialize()
    ' 共通関数を呼ぶ
    Call UserForm1.Button_Click_Common()
End Sub

Answer 2

とりあえず、Userform1とUserform2 の関係、処理の流れを説明してください。

例えば、下記のような感じで。

1. Userform1 から Userform2 をモーダルで開く
2. Userform2でYesボタンまたはNoボタンを押すとUserform2が閉じる
3. Userform1で、YesボタンまたはNoボタンを押したかで処理を分ける

この場合はそれぞれのフォームはモーダルなのかモードレスなのか、は重要ですので、それも提示してください。それによってコードがまったく異なりますので。

追記

この回答への質問者さんのコメントの内容は、
上記で推測した仕様とほぼ同じようです。
その仕様に基づいたコード例を提示しておきます。

UserForm1

Option Explicit
Public userform2_hantei As Integer

Private Sub button_ok_Click()
    userform2_hantei = 0 '初期化
    UserForm2.Show
    If userform2_hantei = 1 Then
        'Yesボタンが押された時の処理
        MsgBox "Yesボタンが押されました！"
    Else
        'それ以外の時の処理
    End If
End Sub

UserForm2

Private Sub Button_Yes_Click()
    UserForm1.userform2_hantei = 1
    Unload Me
End Sub

UserForm1のPublic変数を介してどのボタンをクリックしたかを渡す

Comments

[退会済みユーザー]

回答ありがとうございます。
無知で申し訳ございません。

Userform1とUserform2 の関係は、userform1にある実行ボタン(button_ok)を押すことでuserform2が出現するような処理になっています。

Userform2には、YesボタンとNoボタンがあり、
yesボタンを押すことで、Userform1に記述された処理が行われます。

また、userform2にあるyesボタンとNOボタンのどちらかを押すことで、userform2は閉じます。

[退会済みユーザー]

付け足しとしまして、userform1は、実行ボタンを押した後、一連の作業が終わったら、閉じるようにしています。

Answer 3

Userform2のボタンのイベント処理はUserform2に書くものだと思います。それでは何か問題があるのでしょうか？

Answer 4

Userform2のボタンを押したときにUserform1のなんかの変数をなんかするとかなんかの関数を呼び出すとかすればいいのではないかと。