2つのフォームを交互に表示する
  フォーム「UserForm1」とフォーム「UserForm2」の2つのフォームを用意します。
  フォーム「UserForm1」をクリックするとフォーム「UserForm2」が表示され、
  フォーム「UserForm2」をクリックするとフォーム「UserForm1」が表示される
 ようにします。
  フォーム「UserForm1」が表示される時に発生するイベントでは、次のような
 処理を用意します。

Private Sub UserForm_Initialize()
    Load UserForm2
    UserForm2.Show
End Sub

  フォーム「UserForm1」をクリックした時に時に発生するイベントでは、
 次のような処理を用意します。

Private Sub UserForm_Click()
    UserForm2.Show
End Sub

  フォーム「UserForm2」をクリックした時に時に発生するイベントでは、
 次のような処理を用意します。

Private Sub UserForm_Click()
    UserForm2.Hide
End Sub

Excel97



戻る


Excel Word Access VBA! モーグ