Desactivation du bouton mode creation [Résolu]

mikmak78 59 Messages postés vendredi 5 octobre 2012Date d'inscription 6 mars 2017 Dernière intervention - 20 avril 2015 à 21:26 - Dernière réponse : ucfoutu 18039 Messages postés lundi 7 décembre 2009Date d'inscriptionModérateurStatut 11 avril 2018 Dernière intervention
- 28 avril 2015 à 18:43
Bonjour,
Est-il possible de desactiver le bouton Mode creation dans une VBA workbook_open?
merci d'avance
Afficher la suite 

Votre réponse

11 réponses

Meilleure réponse
ucfoutu 18039 Messages postés lundi 7 décembre 2009Date d'inscriptionModérateurStatut 11 avril 2018 Dernière intervention - Modifié par ucfoutu le 23/04/2015 à 22:17
1
Merci
Amusons-nous, juste pour voir et rigoler, à mettre ceci dans un module :
Public Sub titi()
If Application.VBE.ActiveVBProject.Mode > 0 Then Range("A1") = Range("A1")
Application.OnTime Now + TimeValue("00:00:01"), "titi"
End Sub

et ceci dans la sub workbook_open
Application.OnTime Now + TimeValue("00:00:00"), "titi"

Je te conseille de faire cette expérience dans un nouveau classeur, d'y insérer ce code, d'enregistrer, fermer, puis réouvrir le classeur pour voir ce qui arrive en tentant de passer en mode création.

Avant d'appliquer cela à ton vrai classeur (celui qui a d'autres protections en plus), invente-toi vite une méthode secrète pour arrêter ce mécanisme (il y en a plus d'une possible). Car si tu ne le fais pas, tu resteras bien évidemment dehors toi également.

________________________
Nul ne saurait valablement coder ce qu'il ne saurait exposer clairement.

Merci ucfoutu 1

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 96 internautes ce mois-ci

mikmak78 59 Messages postés vendredi 5 octobre 2012Date d'inscription 6 mars 2017 Dernière intervention - 28 avril 2015 à 17:00
je pense que je vais arreter la boucle tous simplement avec mon login. mais je vais tester...
Commenter la réponse de ucfoutu
Meilleure réponse
ucfoutu 18039 Messages postés lundi 7 décembre 2009Date d'inscriptionModérateurStatut 11 avril 2018 Dernière intervention - Modifié par ucfoutu le 28/04/2015 à 22:14
1
Merci
Si ton problème principal est résolu, pense s'il te plait à libérer cette discussion (un clic sur le tag RESOLU) au niveau de ton premier message)

EDIT : j'ai oublié de te dire : à l'époque où j'ai utilisé ce machin, j'ai surtout voulu contrer un collaborateur de très mauvaise foi. Mais je ne me suis alors pas contenté de ce que j'ai mis dans la procédure titi ===>> j'y ai ajouté de quoi écrire dans un fichier texte secret, ouvert en "append" la date et l'heure de chaque tentative de passage en mode création (hé hé !).

________________________
Nul ne saurait valablement coder ce qu'il ne saurait exposer clairement.

Merci ucfoutu 1

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 96 internautes ce mois-ci

Commenter la réponse de ucfoutu
ucfoutu 18039 Messages postés lundi 7 décembre 2009Date d'inscriptionModérateurStatut 11 avril 2018 Dernière intervention - 20 avril 2015 à 21:37
0
Merci
Bonjour,
Le "vieux crouton" que je suis est persuadé (il l'a toujours été) que le développement commençait par au moins la préhension des termes utilisés.
Alors dis-moi, s'il te plait : c'est quoi, une "VBA workbook_open" ???
C'est quoi, d'ailleurs "une VBA" ?
Reviens s'il te plait avec des termes qui montrent que tu appréhendes au moins un peu ce dont tu veux parler. Merci de faire cet effort. Le "vieux" que je suis appréciera.
Commenter la réponse de ucfoutu
mikmak78 59 Messages postés vendredi 5 octobre 2012Date d'inscription 6 mars 2017 Dernière intervention - 21 avril 2015 à 13:32
0
Merci
lol
Salut Ucfoutu!
Tu as raison je vais etre plus precis.
Je teste une alternative, a la protection des données de feuille.
L'idée est de mettre dans une Private Sub Workbook_open()
cette partie de code qui empeche la modification des données

If Intersect(Target, Range("XXXXX")) Is Nothing Then
Application.EnableEvents = False
Application.Undo
Application.EnableEvents = True
End If

Mais cette protection ne sert a rien si l on peut modifier la feuille en appuyant tous simplement sur le bouton "mode creation" qui se trouve dans l onglet developpeur dans la barre de commande excel.
Commenter la réponse de mikmak78
mikmak78 59 Messages postés vendredi 5 octobre 2012Date d'inscription 6 mars 2017 Dernière intervention - 22 avril 2015 à 09:38
0
Merci
je pense avoir trouver une solution. Comme mon fichier test est en partage.
le bouton "mode creation" est desactivé!
mikmak78 59 Messages postés vendredi 5 octobre 2012Date d'inscription 6 mars 2017 Dernière intervention - 23 avril 2015 à 11:10
Bonjour!!!
J'ai fait une grosse erreur!!! le "mode creation" n 'est pas desactivé... On ne peut plus acceder a la macro mais on peut quand meme se mette en mode mode creation....
Y a t-il une possibilité de masquer le bouton "mode creation" part une macro?
Commenter la réponse de mikmak78
cs_MPi 3877 Messages postés mardi 19 mars 2002Date d'inscription 23 août 2018 Dernière intervention - 23 avril 2015 à 14:33
0
Merci
Quelle version d'Excel utilises-tu ?
mikmak78 59 Messages postés vendredi 5 octobre 2012Date d'inscription 6 mars 2017 Dernière intervention - 23 avril 2015 à 15:02
sous Office 2013
cs_MPi 3877 Messages postés mardi 19 mars 2002Date d'inscription 23 août 2018 Dernière intervention - 23 avril 2015 à 19:05
Il te faudrait alors passer par la "programmation" du ruban.
Il y a des tutos sur le web là-dessus.

Tu pourrais masquer l'onglet Développeur, ce qui serait plus simple, je pense. Autrement, tu pourrais désactiver le bouton seulement.
Commenter la réponse de cs_MPi
mikmak78 59 Messages postés vendredi 5 octobre 2012Date d'inscription 6 mars 2017 Dernière intervention - 28 avril 2015 à 16:58
0
Merci
merci ucfoutu
Je vais tester
Commenter la réponse de mikmak78

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.