Discussion :

[imane_lam]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[Invité]

C'est normal puisque tu as mis:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Pages(2).Visible = False

Tu ne peux afficher un onglet qui est masqué !

[imane_lam]

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

[Soraphiroth]

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.

[imane_lam]

Pourtant ca marche toujours pas chez moi!!

[Soraphiroth]

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