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
Merci
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
Partager