Empéché l'ouverture d'un autre classeur

[akibodo]

Bonjour à tous,

J'aimerais savoir si il est possible par le biais d'une macro d'empéché l'ouverture d'un autre classeur une fois mon classeur ouvert ?

Pour mettre les choses dans leurs contexte, j'utilise une UserForm ainsi qu'un code qui fais caché la feuille excel de façon à laisser seulement la UserForm visible. Seulement voilà, si j'ouvre un autre classeur ou click sur excel ça tombe à l'eau ...

Celà peut devenir d'autant plus embétant du faite que sur ma UserForm j'utilise un bouton "Quitter" qui ferme l'application excel sans enregistrer les modifications, donc si un autre classeur est ouvert et modifier puis fermer par le bouton de ma UserForm rien ne sera enregistrer et sans prévenir l'utilisateur.

Si c'est possible j'aimerais savoir si il est possible de lever cette "empèchement" le temps d'ouvrir un autre classeur y enregistrer des données ou simplement l'imprimer puis le refermer et remettre l'empèchement d'ouverture??

J'espère que j'ai bien d'écrit mon problème,

A vous lire et merci d'avance.

 

[akibodo]

Re : Empéché l'ouverture d'un autre classeur

Re le forum,

Pas de solutions apparement ?

 

[skoobi]

Re : Empéché l'ouverture d'un autre classeur

Bonjour,

tu ouvres l'USF en non modal je suppose: Userform1.Show 0

Si c'est le cas (et si ça te convient) enlève le 0.

 

[akibodo]

Re : Empéché l'ouverture d'un autre classeur

Re le forum, Skoobi,

Je ne connais pas le mode "modal" et je n'utilise pas non plus : "Userform1.Show 0"
Je sais pas ce que celà donne d'ailleurs.

Le code que j'utilise dans ThisWorkBook est :

Private Sub Workbook_Open()
Application.Visible = False
UserForm1.Show
End Sub

Je joint un exemple pour être plus explicite.

AVANT D'OUVRIR LE FICHIER FERMER VOS CLASSEUR OUVERT POUR PAS PERDRE LES MODIFICATIONS !

Je veux "simplement" ne pas pouvoir ouvrir un autre classeur une fois le mien ouvert.

A vous lire.

 

[Cousinhub]

Re : Empéché l'ouverture d'un autre classeur

Bonsoir,
Il est plus prudent de désactiver ce type de code avant de le poster sur le forum....
En effet, je n'avais peut-être pas envie d'enregistrer mes autres classeurs ouverts, ni de fermer excel...
J'aurais dû désactiver les macros à l'ouverture, mais tant pis, c'est fait......

 

[akibodo]

Re : Empéché l'ouverture d'un autre classeur

Re,

Mince toutes mes excuses !

Je suis désolé, et voilà ce que je veux éviter ....

ps: encore désolé je vais Edit.

 

[akibodo]

Re : Empéché l'ouverture d'un autre classeur

Re le forum,

D'après ce que j'ai pu voir sur le net celà serait possible avec l'utilisation de module de classe pour détecter l'ouverture de classeurs ou applications excel supplémentaire.

Si quelqu'un si connait en module de classe ...

Merci d'avance.

 

[Pierrot93]

Re : Empéché l'ouverture d'un autre classeur

Bonjour à tous

peut être tout simplement mettre la propriété "showmodal" de ton USF à "true" :*

UserForm1.Show 1

pas top de rendre l'appli invisible, chez certains utilisateurs cela peut être très ennuyeux...

bonne journée
@+

 

[akibodo]

Re : Empéché l'ouverture d'un autre classeur

Re bonjour à tous,

Je ne connaisser pas cette propriété et en effet ça marche lorsque j'essaye d'ouvrir un autre classeur "nommé".

Par contre si je click sur Excel.exe , là excel se lance.

Sinon je rend excel invisible pour une question d'estétique, et puis après je me suis dis que ça pouvais également service de sécurité.

Malheureusement si j'ai la possibilitée d'ouvrir excel simple ça enlève pas mon problème.

Merci pour la réponse , @ vous lire.

 

[Pierrot93]

Re : Empéché l'ouverture d'un autre classeur

Re

perso pas de solution, pour empêcher le lancement d'une nouvelle instance d'Excel. Peut être quelqu'un d'autre...

Bon après midi
@+

 

[Staple1600]

Re : Empéché l'ouverture d'un autre classeur

Re


Une solution alambiquée
(que j'ai utilisé jadis pour éviter que des collègues me fichent le souk sur mon poste)

(A n'utiliser que sur son propre poste de travail)

Créer un script VBS qui demande un mot de passe
(via une InputBox)

Remplacer tout les raccourcis d'Excel.exe par un raccourci qui pointe vers ce script VBS.

A n'utiliser qu'avec des utilisateurs "débutants"

Peut être améliorer en touchant la base de registre
(mais là danger)

Pour ce qui est du script VBS en lui-même

voir sur le net
(Syntaxe très proche de celle de VBA)
Extension du fichier:vbs
(Possibilité d'encrypter ce fichier car le mot de passe est stocké en clair)

 

[akibodo]

Re : Empéché l'ouverture d'un autre classeur

Re le forum,

Merci pour ces réponses, je crois que je vais pas plus me prendre la tête

Merci encore.