Un objet multipage réticent

"Saperlipopette", m'exclamais-je, il n'y a pas 5 minutes, quand, testant mon programme, je m'apercevais qu'il ne fonctionnait pas.

Voici :

J'ai créé un formulaire de saisie, incorporant un objet multipage. La dernière page est invisible par programme à l'ouverture du formulaire. Je souhaitais... je souhaite toujours, d'ailleurs, la rendre visible ou non suivant la valeur d'un bouton d'option (OBtTermine).

Le code tient en ces quelques lignes dans l'évènement change du bouton sus-nommé :

Code:

---

1 2 3 4 5 6 7 8 9

Select Case OBtTermine Case True MltPg.Value = 2 ' C'est la troisième page MltPg.SelectedItem.Visible = True Case False MltPg.Value = 2 MltPg.SelectedItem.Visible = False End Select

---

Le désarroi m'étreint, merci de m'éclairer !

Bonjour,

Essaye comme ceci :

Code:

---

1 2 3 4 5 6

Select Case OBtTermine Case True MltPg.Pages(2).Visible = True Case False MltPg.Pages(2).Visible = False End Select

---

Joie, çà marche !!!