Message d'avertissement en fermant un USF à partir d'un autre USF

[marcelio]

Bonjour,
Avec mon USF1 je peux inscrire des données et les enregistrer
Tout fonctionne correctement

Avec mon USF2 je peux inscrire des données et les enregistrer
Tout fonctionne correctement aussi

Mon problème
J'ouvre l'USF2 et à partir de celui la, DE TEMPS EN TEMPS j'ouvre l'USF1
Quand je ferme l'USF1 je retourne sur USF2. ca c'est OK
Ce que j'aimerais c'est dès que je clic sur le bouton QUITTER ou sur la croix de l'USF1, SEULEMENT QUAND JE FERME L'USF1 A PARTIR DE L'USF 2
c'est d'avoir un message qui me rappelerais de ne pas oublier d'enregistrer les données de l'USF1.

Merci d'avance de l'aide que vous pourrez m'apportée.
Marcelio

 

[Jacky67]

Bonjour,
Classeur à tester en pj

 

[marcelio]

Bonjour jacky67,
Merci pour le fichier c'est super.
Bon après midi à toi et au Forum.
et encore merci.
Marcelio

 

[marcelio]

Re bonjour à tous,
J'ai du m'absenter et je viens de tester le code de jacky67 sur mon fichier original.
J'ai bien le message d'information quand je quitte l'USF1 qui est sur l'USF2.
Mais quand j'ouvre l'USF1 et que je quitte cela me mets :
Erreur d'exécution '9'
L'indice n'appartient pas à la sélection.
et en jaune
If USF2.Visible
Merci de votre aide
Marcelio

 

[Jacky67]

Re...
Peux-tu mettre un bout du fichier que tu utilises en ligne ?
Le fichier en exemple fonctionne ??

 

[marcelio]

Re,
Cela ne va pas être possible car :
1) c'est un fichier du boulot et de
2) c'est le fichier de mon chef et il est en vacance, donc il faut que j'ai son autorisation pour vous envoyer un bout du fichier.
Sinon j'ai remarquer que quand l'USF2 est ouvert l'USF1 fonctionne bien
car mes 2 fichiers sont en mode : ShowModal False
A+
Marcelio

 

[Jacky67]

Re...
Certes, mais cela ne me dit pas si le classeur que j'ai mis en ligne provoque aussi cette erreur.
A tout hasard....
If USF2.Visible =true .....

 

[marcelio]

re,
Le classeur fonctionne très bien,
J'ai testé ton bout de code mais c'est toujours pareil.

 

[Jacky67]

Re...
Sans le classeur, une rustine
Avant l'instruction
On Error Resume Next

 

[marcelio]

Re,
C'est presque bon,
J'ai bien le message d'information, mais je clic sur OK le message d'erreur reviens

 

[Jacky67]

Re,
C'est presque bon,
J'ai bien le message d'information, mais je clic sur OK le message d'erreur reviens

Re...
Si le classeur exemple fonctionne correctement, il n'y a pas de raison évidente que cela ne fonctionne pas.
Le problème est ailleurs.
Attendons le retour du chef

 

[marcelio]

Re,
C'est la seule solution, en espérant qu'il soit d'accord.
Bonne soirée à toi et au Forum.
et merci de ton aide
Marcelio