XL 2016 masquer qu'un seul classeur et laisser l'autre visible

[dindin]

Bonjour
j'ai toujours un classeur excel d'ouvert en permanence .

je souhaiterai que si j'ouvre un 2 ème classeur, ce dernier reste masqué avec l'ouverture seulement d'un formulaire
et le 1er reste ouvert en permanance.
j'utilse ce code qui m'affiche une erreur :

Option Explicit

Private Sub Workbook_Open()
Application.ScreenUpdating = False
ActiveWindow.Visible = False
Windows(ActiveWorkbook.Name).Visible = False 'quand l'application se lance, le fichier excel devient invisible, mais reste ouvert
accueil.Show 'et la boite de dialogue d'accueil apparait
Application.ScreenUpdating = True
End Sub

je joins mon fichier
j'aurais besoin de votre aide
merci d'avance

 

[job75]

Bonjour dindin,

Voyez le fichier joint et ce code dans ThisWorkbook :

Private Sub Workbook_Open()
Application.OnTime 1, "ThisWorkbook.USF" 'exécution différée
End Sub

Sub USF()
ActiveWindow.WindowState = xlMinimized
UserForm1.Show 0 'non modal
End Sub

A+

 

[dindin]

Bonjour job75
Merci
Je regarde et vous tiens au courant

 

[dindin]

merci pour le fichier
mon objectif était le suivant :
mon classeur 1 s'ouvre en premier et reste ouvert et quand j'ouvre le votre "Bonjour" ,ce dernier reste masqué et il n y a que son formulaire qui reste ouvert pour que je puisse travailler dessus.
d'aprés l'essai que je viens de faire.
le classeur Bonjour reste apparent ainsi que son formulaire.
Merci d'avance

 

[job75]

Bonjour dindin,

Masquer la fenêtre ne va pas, moi je la réduis, elle n'est visible que dans la barre des tâches.

Maintenant voyez ce fichier (2) où j'ai remplacé Workbook_Open par Workbook_Activate.

Quand un autre fichier est ouvert Bonjour(2).xlsm ne peut pas être activé.

A+

 

[dindin]

Merci