Empêcher le changement de nom d'une feuille

  • Initiateur de la discussion Initiateur de la discussion zephir94
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

zephir94

XLDnaute Impliqué
Bonjour à tous,

Je suis arrivé à empêcher la possibilité de supprimer une feuille de mon classeur en ne laissant pas la possibilité de faire apparaitre le menu sur l'onglet comme ceci

Code:
Private Sub Workbook_Open()
Application.CommandBars("Ply").Enabled = False
End sub

Mais je voudrais maintenant empêcher de changer le nom d'une feuille.

Après recherches j'ai trouvé ceci à placer dans chaque feuilles concernées:

Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
     If ActiveSheet.Name <> "toto" Then
         ActiveSheet.Name = "toto"
     End If
End Sub

Mais cela ne fonctionne pas !

quelqu'un a t'il une autre idée ?
Merci par avance de vos aides
 
Re : Empêcher le changement de nom d'une feuille

Bonjour, hello Pierrot93

tester ceci

'A METTRE DANS THISWORKBOOK
Private Sub Workbook_Open()
Call ActionSuppression
End Sub

'A METTRE DANS UN MODULE
Sub ActionSuppression()
Dim c As CommandBarControl
For Each c In Application.CommandBars.FindControls(ID:=847)
c.OnAction = "Suppression"
Next c
End Sub

Sub Suppression()
MsgBox "Vous ne pouvez pas supprimer cette feuille", vbOKOnly, "INFORMATION"
'Affiche un message au lieu de supprimer
'AUTRE CONDITION
'ActiveSheet.Delete 'supprime si possible
End Sub
 
Re : Empêcher le changement de nom d'une feuille

Protéger le classeur ?
je ne me suis jamais penché sur la question, mais chaque pages ont une protection individuelle avec un mot de passe.
Si je met une protection sur le classeur il va falloir que je déprotège le classeur dans chaque macro avant les feuilles ?
 
Re : Empêcher le changement de nom d'une feuille

Ce que je voudrais savoir en fait c'est les répercutions que cela va avoir dans les protections de mes feuilles car je les déprotèges successivement en fonction des besoins dans plus d'un quarantaine de macros !
Cette protection de classeur doit être désactivé dans mes quarante macros ? et de nouveau activé à la fin de chaque macros ?
 
Re : Empêcher le changement de nom d'une feuille

Re,

Cette protection de classeur doit être désactivé dans mes quarante macros ? et de nouveau activé à la fin de chaque macros ?

comme déjà dit, oui si par le code tu insere, supprime ou modifie le nom d'une feuille..... dans le cas contraire, pas besoin...

A noter également pour que le code puisse agir sur une feuille protégée sans avoir à déprotéger, il faut que la protection de la feuille soit effectuée par le code en utilisant l'argument "userinterfaceonly"...
 
Re : Empêcher le changement de nom d'une feuille

Merci Pierrot pour toutes ces précisions, j'ai hélas découvert userinterfaceonly bien tardivement !
Je l'utiliserais pour mes prochains projets car cela m'evite de déprotéger et protéger effectivement !

Un grand merci à vous tous
 
Re : Empêcher le changement de nom d'une feuille

Re,

Il n'y a aucune relation entre la protection du classeur et la protection des feuilles.

On peut toujours déprotéger/protéger une feuille, même quand le classeur est protégé.

Facile à tester.

A+
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
15
Affichages
467
Retour