Fermer UserForm à l'ouverture d'un autre

[Boby71C]

Bonjour à tous
Lorsque je clic sur mon bouton de validation dans un UserForm, je désir la fermeture de celui-ci avant l-ouverture d'un autre.

Voici le code que j'ai renseigné et ça ne fonctionne pas.

Private Sub Galaxis_Click()
Unload Références_Projet
Type_Colonnes.Show

End Sub
Tous mes Userforms s'empilent à l'écran les uns sur les autres. au dernier, j'ai le même code et ils se referment tous en même temps.
Ou est mon erreur SVP ?
Merci pour votre aide.
@+

 

[PAD]

Bonjour le forum, Boby,

Et bien je pense que dans le code d'ouverture du 2éme USF, tu peux mettre la fermeture du 1er et ainssi de suite.

A+ PAD

 

[PascalXLD]

Bonjour

par moment c'est juste un problème d'affichage

j'ai fait l'essai sur 4 uf vierge et pas de problème

essaies en ajoutant repaint entre 2

Private Sub Galaxis_Click()
Unload Références_Projet
repaint
Type_Colonnes.Show

End Sub

 

[Boby71C]

Bonjour les amis
Merci pour votre intervention rapide.
Je mets bien la fermeture dans chaque code et j'ai éssayé avec Repaint mais toujour pareil !!
Je crois que je devrai m'en contenter.
Domage car cet empilage de fenêtres n'est pas très présentable à l'écran.

@+

 

[PascalXLD]

RE

Tu pourrais envoyer ton fichier sans les données pour voir

 

[PAD]

Re Boby,

Fait nous passer ton fichier si tu veux.

A+ PAD



B) Sorry Pascal, je me suis collé à toi :whistle:

Message édité par: PAD, à: 18/04/2006 17:48

 

[Boby71C]

Désolé mais même réduit au maxi, j'ai encore 64 Ko.Je crois qu'il n'y a que la solution en MP.
Merci à tous deux.
@+

 

[PascalXLD]

Re

Je t'ai mon MP dans ta BAL XLD

 

[PAD]

Re le fil,

Une autre façon pour joindre les fichiers:

http://www.cjoint.com/

A+ PAD

 

[PascalXLD]

Re

C'est normal car dans thisworkbook_open avant le lancement de l'UF tu as un Application.ScreenUpdating = False que tu ne remets pas à true donc l'update de l'affichage ne se fait pas ou plutot se fait qu'à la fin de ton appli

 

[Boby71C]

Re
Merci Pascal76. Heureusement que nous avons des connaisseurs.
J'ai enlevé le thisworkbook_open et ça fonctionne.
Je vais pouvoir continuer mon appli.
Si tu as des remarques sur la conception, n'hésite pas à les faire, elles seront les bienvenues.

Merci à tous deux de votre aide.
à+