optionbutton et multipage

Harold · 3 Juin 2009

Bonjour à tous,

Voilà, j'aimerais pouvoir d'une UserForm où il y a 3 OptionButton arrivé en en sélectionnant un des 3 et cliquant sur le bouton de commande arrivé directement sur la page correspondante (multipage) sur la deuxième UserForm
j'ai déjà essayé quelque chose mais ça ne fonctionne pas et je ne sais pas comment faire

J'ai besoin d'aide

Merci d'avance

Harold · 3 Juin 2009

Re : optionbutton et multipage

J'ai trouvé quelque chose qui fonctionne mais j'aurai besoin de correction, je pense que ça ne va pas, surtout s'il y a plus de feuilles

Code:

Private Sub CommandButton1_Click()
If OptionButton1 = True Then
UserForm1.MultiPage1.Value = 0
UserForm1.Show

Else
If OptionButton2 = True Then
UserForm1.MultiPage1.Value = 1
UserForm1.Show
Else
If OptionButton3 = True Then
UserForm1.MultiPage1.Value = 2
UserForm1.Show
End If
End If
End If
End Sub

Merci pour votre aide

Pierrot93 · 3 Juin 2009

Re : optionbutton et multipage

Bonjour Harold

essaye peut être ainsi, en utilisant des "ElseIf" successifs dans l'instruction :

Code:

Private Sub CommandButton1_Click()
If OptionButton1 = True Then
    UserForm1.MultiPage1.Value = 0
    ElseIf OptionButton2 = True Then UserForm1.MultiPage1.Value = 1
    ElseIf OptionButton3 = True Then UserForm1.MultiPage1.Value = 2
End If
UserForm1.Show
End Sub

bon après midi
@+

Harold · 3 Juin 2009

Re : optionbutton et multipage

Merci Pierro93,

ton code fonctionne super bien, c'est exactement le résultat souhaité.

Encore un grand merci

optionbutton et multipage

Harold

Guest

Pièces jointes

Harold

Guest

Pierrot93

XLDnaute Barbatruc

Harold

Guest

Discussions similaires

optionbutton et multipage

Harold

Guest

Pièces jointes

Harold

Guest

Pierrot93

XLDnaute Barbatruc

Harold

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency