Discussion :

[Xan51]

Bonjour à tous,

Je démarre plus ou moins en VBA, j'écris quelques macros et habituellement Google est mon ami mais je suis bien embêté car ce coup ci je ne trouve aucune solution à mon problème.

Je vous explique : J'essaie de créer un macro afin de faciliter la vie de mes collègues.
J'ai beaucoup de fichier dans un répertoire, ils ont tous un nom de fichier identique à part une information.

Donc je me suis dit que j'allais créer un fichier excel qui pourrait demander cette information et ouvrir le fichier demandé.
J'ai créé un userform pour rentrer cette information et un bouton appelle une macro d'ouverture en reprenant la valeur en question.

Pas de problèmes jusque là le fichier s'ouvre et on peut travailler dessus.

Mon problème est le suivant : J'aimerai qu'à la fermeture du fichier ouvert, le userform soit rappelé afin de redemander l'information et ainsi ouvrir un second fichier, voir plus, et qu'on quitte en cliquant sur un bouton quitter sur le user form.
J'ai essayé pleins de solutions , surtout en macro évènementielles, comme la réactivation du fichier principal et du coup mon user form .show...
Mais j'ai l'impression que ça boucle à l'infini ...

Bref si quelqu'un à une idée ... Je suis complétement preneur

Merci d'avance

[unparia]

Bonjour
Les évènements du classeur appelé en ouverture ne sont gérables que depuis ce classeur.
Si tu ne peux agir sur ces évènements, tu n'as alors d'autres possibilité que celle de la vérification par la méthode Application.ontime, de la fermeture du fichier appelé (qui disparait alors de la collection Workbooks) et (si fermeture) faire ce que tu entends faire depuis le fichier appelant.
Il me semble bien que pas plus tard que hier ou avant-hier, une question similaire ***** a été posée (et qu'elle a bien entendu reçu une réponse identique).

EDIT :
*****
La voilà, la discussion similaire en cause --->>
https://www.developpez.net/forums/d1...r/#post9219755

[Xan51]

Coucou unparia et merci pour ta réponse.

Je ne suis plus au boulot donc malheureusement je ne peux pas tester ... Mais en attendant je vais me renseigner sur ce Ontime et j'ai ouvert ton lien et vu une fonction pour tester l'ouverture ou non d'un fichier

Merci je pense que ça va beaucoup m'aider.

[eriiic]

Bonjour à tous,

Tu as App_WorkbookBeforeClose() dans les événements d'application.
Ils nécessitent une préparation du classeur avant d'y avoir accès. Dans ThisWorkbook :

Code :

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

1
2
3
4
5
6
Private WithEvents App As Application
 
Private Sub Workbook_Open()
    'récupérer l'application Excel à l'ouverture
    Set App = Application
End Sub

Lancer Workbook_Open(), tu as App qui s'est ajouté dans la liste déroulante de gauche, avec tous ses événements dans celle de droite.
Relancer Workbook_Open() à chaque fois que tu fais une modif de ces événements et que tu les teste pour qu'excel les prenne en compte (un peu ch... mais bon)
http://www.cpearson.com/excel/AppEvent.aspx
eric

[Xan51]

Bonjour,

J'ai réussi et je vous dit merci à tous les deux.
Alors j'ai voulu tester la méthode ONTIME d'abord de unparia.
Le problème c'est que je n'ai jamais réussi à faire le test de l'ouverture du fichier mais que l'utilisateur garde le contrôle sur le fichier. J'avais besoin que ce soit complètement transparent pour l'utilisateur.

Mais du coup, avec la méthode d'eriic, j'ai pu faire en sorte qu'à chaque fermeture du fichier, il me réaffiche mon userform pour réouvrir un fichier ou quitter tout.

Merci donc à vous deux et je passe le post en résolu.