テスト21

'フォームAからフォームBを表示して文字列を入力、
'一旦非表示にしてフォームCからフォームBの情報を利用するコード

'フォーム2

Private Sub CommandButton1_Click()

Me.Hide

End Sub

'---------------------------------
'フォーム3

Private Sub CommandButton1_Click()

MsgBox UserForm2.TextBox1.Value & UserForm2.TextBox2.Value

End Sub

Private Sub CommandButton2_Click()

Unload Me

End Sub
'-----------------------------------
'フォーム4

Private Sub CommandButton1_Click()

UserForm2.Show vbModeless

End Sub

Private Sub CommandButton2_Click()

UserForm3.Show vbModeless

End Sub

Private Sub CommandButton3_Click()

Unload UserForm2
Unload Me

End Sub