Evenement entre deux classeurs

[Banzai64]

Bonjour

J'ai un problème sinon je ne serais pas là

Voilà j'ai un fichier avec un USF qui m'ouvre un deuxième fichier dans lequel il y a un bouton
Fichier1 --> USF --> Action CMD1 ---> USF Hide et Ouvre Fichier2
Fichier2 --> Action Bouton --> Ferme Fichier2 --> Fichier1 en avant-plan mais n'ouvre pas USF
mais si
Fichier2 --> Croix fermeture --> Ferme Fichier2 --> Fichier1 en avant-plan et ouvre USF (Par Workbook_Activate())

J'aimerai ouverture de l'USF lors du click sur bouton

Je joins deux fichiers pour illustrer le souci

J'utilise Workbook_Open() pour ouvrir l'USF

Merci par avance de toute l'aide que vous pourriez me donner

C'est Retour de classeur qui appelle Retour de classeur 2

 

[Pierrot93]

Re : Evenement entre deux classeurs

Bonjour Banzai,

peut être ainsi :

Sub retour()
Workbooks("Retour de classeur.xls").Activate
ThisWorkbook.Close
End Sub

puisque l'affichage de l'usf est déjà dans le code de ce classeur...

bon après midi
@

 

[Banzai64]

Re : Evenement entre deux classeurs

Salut Pierrot93

Merci !!! Merci !!! Merci !!!

Franchement je n'y avais pas pensé

Tu m'enlève une sacrée épine du pied

Merci encore

 

[job75]

Re : Evenement entre deux classeurs

Bonjour Banzai64, salut pierrot,

Autre solution, si le fichier 2 n'a toujours qu'une fenêtre :

Sub retour()
SendKeys "^w"
End Sub

Cela revient à cliquer sur la croix de la fenêtre du fichier.

A+

 

[Banzai64]

Re : Evenement entre deux classeurs

Merci Job75

C'est une solution que je vais mettre de côté

Encore merci de vos promptes réponses