een specifieke userform oproepen

[karimba]

Hallo,
Ik wil een specifieke userform oproepen afhankelijk van de waarde in de cel A1.
Als de cel A1 de waarde 0 bevat. wil ik de userform 1 aanroepen en als de waarde 1 aangeeft, wil ik de userform 2 aanroepen.
Hoe doe ik dit?

 

[edmoor]

Dit achter je knop:

Private Sub CommandButton1_Click()
    Set usf = IIf(Range("A1") = 0, UserForm1, UserForm2)
    usf.Show
End Sub

Of:

Private Sub CommandButton1_Click()
    Select Case Range("A1")
        Case 0: UserForm1.Show
        Case 1: UserForm2.Show
    End Select
End Sub

 

[snb]

Hoe je dit moet doen ?
Door dit niet te doen.
Gebruik niet meer dan 1 userform,
Voor verschillende soorten opbouw gebruik je een multipage in het userform.
Dan kun je binnen het userform naar een onbeperkt aantal 'userforms' schakelen.

 

[karimba]

De code van edmoor heb ik gebruikt bij 1 userform en deze werkt perfect .
Bedankt hiervoor.