probleme d'execution du code vba

Bonjour,
Dans mon programme j'ai mis des boucles if pour dire si on choisie une expression precise dans notre zone de liste tel onglet va s'ouvrir . mais l'onglet que je ouvrir ne s'ouvre pas pourtant j'ai tout mentionné dans mes multipages et il n y a pas de message d'erreur.Je ne comprends rien

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23

If selec.Value = "x" Then With Worksheets("..")   afficherdate.Value = "" co.Value = "" equipe.Value = ""       With MultiPage1 .Pages(0).Visible = True .Pages(1).Visible = True .Pages(2).Visible = False .Pages(3).Visible = False .Pages(4).Visible = False .Pages(5).Visible = False .Pages(6).Visible = False .Pages(7).Visible = False   MultiPage1.Value = 2   End With end with

---

Merci

C'est normal puisque tu as mis:

Code:

---

.Pages(2).Visible = False

---

Tu ne peux afficher un onglet qui est masqué !

Je ne pense pas que c'est ça le probleme,parce que meme quand je mets true ou meme quand j'enleve toute l'expression y'a rien qui change

je confirme les propos de vcottineau, une page invisible ne s'affichera pas. J'ai testé vite fait de mon côté et remettre .visble à true permet l'affichage. Par contre ton bloc if ne se finit pas, mets un End If en dernière ligne.

Pourtant ca marche toujours pas chez moi!!

Comment appelles-tu ta macro ? Peut-on voir le code complet ?

Bonjour,

Si tu mets un point d'arrêt sur la ligne With Multipage1
est-ce que le code s'arrête bien dessus quand tu roules ta macro ?

Peut-être que le problème vient de plus haut dans la condition If... peut-être (?)

Bonjour,
c'est bon j'ai trouvé le problème c'est un truc de ouff c'etait dans un espace que j'ai declarer sur ma worksheet et pas sur mon code.
Merci quand meme ;)