Discussion :

[Pierre67]

Bonjour à tous

mon souci est le suivant :

depuis mon userform1 j'ai un bouton pour ouvrir un userform2
depuis mon userform2 j'ai un bouton pour revenir vers mon userform1

j'ai un problème avec les userform load,show ou unload car j'ai soit une erreur 400 ou 9

quelqu'un peut-il m'indiquer comment résoudre ce problème ?
merci à vous

[Invité]

bonjour,
un peut de code serait le bien venu et ne sois pas radin d'information.

[Pierre67]

le code pour ouvrir mon userform2

Code :

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

1
2
3
4
5
6
Sub btmaj_Click()
Unload frmenu
 
Load frmiseajour
frmiseajour.Show
End Sub

le code pour revenir à l'userform1

Code :

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

1
2
3
4
5
6
Sub btnquitter_Click()
Unload frmiseajour
Load frmenu
frmenu.Show
 
End Sub

[Invité]

Code :

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

1
2
3
4
5
6
sub btmaj_Click()
Unload frmenu
 
'Load frmiseajour
frmiseajour.Show
End Sub

Code :

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

1
2
3
4
5
6
Sub btnquitter_Click()
Unload frmiseajour
'Load frmenu
frmenu.Show
 
End Sub

Code :

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

1
2
3
4
5
6
sub btmaj_Click()
Unload Me
 
'Load frmiseajour
frmiseajour.Show
End Sub

Code :

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

1
2
3
4
5
6
Sub btnquitter_Click()
Unload Me
'Load frmenu
frmenu.Show
 
End Sub

[Pierre67]

Merci à vous deux

j'ai opté pour le code de jpcheck
cela fonction parfaitement

merci encore et .......... sans doute à bientôt

[Pierre67]

Une question

cela fonctionne si les deux codes sont dans le même module

est-ce que cela fonctionne si les codes sont dans des modules différents ?

[Jean-Philippe André]

Salut,

- la procédure Load sert à charger les données (à exécuter la Sub UserForm_Initialize)
- la procédure Show affiche à l'écran le formulaire (s'il n'est pas chargé, exécute la Sub UserForm_Initialize)
- la procédure Unload décharge le formulaire et le ferme

> La procédure Hide cache le formulaire sans le décharger
on a donc les duos
-Show/Hide
-Load/Unload

Si tu cherches à avoir usf1 qui appelle usf2 en se cachant et usf2 qui re-affiche usf tu auras les codes suivants dans les évènements de ton choix

Code :

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

1
2
3
4
5
6
'usf1
Sub TaSub()
Me.Hide
Load usf2
usf2.Show
End Sub

et

Code :

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

1
2
3
4
5
'usf2
Sub TaSub2()
Unload me
usf1.Show
End Sub