Ouverture userform en cascade

Version imprimable

Bonjour

j'ai un userform qui avec le code suiavnt me permet d'ouvrir un ou plusieurs autres userform

mais j'obtiens une erreur 9 l'indice n'appartient pas à la selection lorsque je clique sur le btnchau qui m'ouvre un autre userform

je ne trouve pas l'erreur
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 Sub userform_initialize() End Sub Sub BTANNUL_Click() MENU.Show End Sub Sub btnchau_Click() Unload Me Load IMPRESSCHAU IMPRESSCHAU.Show End Sub Sub btndep_Click() Unload MENU Load IMPRESSDEP IMPRESSDEP.Show End Sub Sub btnsig_Click() Unload MENU Load IMPRESSSIG IMPRESSSIG.Show End Sub
cordialement

09/04/2013, 11h20
Marc-L

Bonjour.

Le Unload Me n'est pas à sa place !

En lisant l'aide de Unload …
09/04/2013, 13h05
Pierre67

j'ai mis le unload me en fin de proc cela ne change rien
09/04/2013, 13h10
Marc-L

Cela manque de précisions …

voivi le code qui me lance l'userform n° 2 à partir de l'usf n°1

Code:

1
2
3
4
5
Sub btprint_Click()
    Load IMPRESSION
    IMPRESSION.Show
    Unload MENU
End Sub

et le code lié à l'usf n°2 qui permet d'autres choix

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Sub userform_initialize()
End Sub
Sub BTANNUL_Click()
     MENU.Show
End Sub
Sub btnchau_Click()
     Load IMPRESSCHAU
     IMPRESSCHAU.Show
     Unload IMPRESSION
End Sub
Sub btndep_Click()
     Load IMPRESSDEP
     IMPRESSDEP.Show
      Unload MENU
 
End Sub
Sub btnsig_Click()
     Load IMPRESSSIG
     IMPRESSSIG.Show
          Unload MENU
 
End Sub

09/04/2013, 13h21
Marc-L

En indentant le code et en "l'aérant" entre les procédures ainsi d'uiliser l'icône de la balise code, cela faciliterait la lecture !

Et cela ne me dit toujours pas quelle ligne déclenche l'erreur.

Ce code d'erreur correspond à un argument appelé inexistant …
09/04/2013, 13h31
Pierre67

Citation:

mais j'obtiens une erreur 9 l'indice n'appartient pas à la selection lorsque je clique sur le btnchau qui m'ouvre un autre userform

tout est dit dans mon premier message
01/05/2013, 13h07
AlainTech

Citation:

Envoyé par Pierre67

tout est dit dans mon premier message

Bonjour,

Non, tout n'est pas dit!
On te demande quelle ligne provoque l'erreur.
Si tu ne le dis pas, ne t'étonne pas de ne plus avoir de réponse.