|
|
Bonjour,
J'ai fait un Splash Screen pour avertir mes collègues à l'ouverture de différents classeurs... Mais j'ai besoin (pour une macro située dans un autre classeur) que ces Splash Screen n'apparaissent que lorsque les collègues ouvrent ces documents en mode "En écriture" (pour lequel ils doivent rentrer un mot de passe).
Voici ma source pour le formulaire (c'est un userform qui disparait après 30 secondes d'apparition) :
Private Sub UserForm_Initialize()
Application.OnTime Now + TimeValue("00:00:30"), "fermer"
End Sub
Et voici le module lié :
Private Sub fermer()
Unload UserForm1
End Sub
Comment puis-je faire pour que ce Splash Screen ne se lance qu'en mode "en écriture" ?
Merci de votre aide.
|
1
