mot de passe (cellules intouchables car protégés)

  • Initiateur de la discussion Initiateur de la discussion anthoYS
  • 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 !

anthoYS

XLDnaute Barbatruc
Bonjour,

Comment faire pour que la zone ou se trouvent les mots de passes même couleur de police que de fond, soient intouchables, c'est-à-dire protégé, par mot de passe (verouillage de la zone).

Aussi, que l'on ne puisse pas selectionné la zone car, si l'on selectionne, on peut lire le mot de passe.

Merci par avance.
 

Pièces jointes

Re : mot de passe (cellules intouchables car protégés)

Bonjour,
Voici un code pour toi:
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Address = "$C$8" Or ActiveCell.Address = "$C$9" Then
ActiveCell.Offset(0, 1).Activate
End If
End Sub
il est dans ton fichier joint:
A+
 

Pièces jointes

Re : mot de passe (cellules intouchables car protégés)

Re,

fhoest saches que le soucis c'est que si je selectionne de C7 à C10 par exemple ou plus, en reflet on peut déchiffrer le mot de passe...

Enfin, toute autre grande selection facilité aussi la lecture en reflet.

Merci si vous avez d'autre piste.

@+
 
Re : mot de passe (cellules intouchables car protégés)

Re,

Pas bête !

Mais si la personne à idée de chercher 'feuille cachée', je suis mal.
Je veux protéger mes codes de ceux qui voudraient violer ma vie privée.

@+
 
Re : mot de passe (cellules intouchables car protégés)

Re,
si tu veux que cela concerne toute les valeurs de la colonne "c"
voici le code:
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Column = 3 Then
ActiveCell.Offset(0, 1).Activate
End If
End Sub
A+
 
Re : mot de passe (cellules intouchables car protégés)

Merci,

mais en étant malin, en maintenant la selection, on peut lire le code en relief...
il faudrait juste qu'aucune selection ne soit possible juste en C8:C9.

@+
 
Re : mot de passe (cellules intouchables car protégés)

Re,Re
sache que tu travaille sur excel donc tous ce que tu pourras essayer de protéger sera en quelque sorte plus ou moins facile a déprotéger par quelqu'un qui maitrise bien l'outils
voici un autre bout de code pour toi
mais n'oublie pas rien n'est infaillible:
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
For Each Cell In Selection
If Cell.Column = 3 Then ActiveCell.Offset(0, 1).Activate
Next
If ActiveCell.Column = 3 Then
ActiveCell.Offset(0, 1).Activate
End If
End Sub
pour moi la solution que Macpoy te propose est intéressante avec un peu de vba derriere pas trop de possibilté de réafficher la feuille tous ceci entre parenthèse bien sur
A+
 
Re : mot de passe (cellules intouchables car protégés)

RE a tous,
l'autre solution est de chiffrer le mot de passe , ceci demande de rajouter une procédure de codage décodage géré dans une classe auto protégé , mais bon ci c'est pour 3 numéro de téléphonze c'est vrai , c'est trés lourd
 
Re : mot de passe (cellules intouchables car protégés)

Et oui bien sur l'astuce que tu propose et aussi celle de camarchepas,je ne connaissait pas
je ne savais pas que la surbrillance disparaissait dans le cas d'une selction simple ou multiple de la cellule et c'est vrai que c'est mieux que le code que j'avais proposer c'est a dire beaucoup plus simple et moins de problème de selection
AU PLAISIR
dommage pour grenoble mais peut être l'année prochaine il remontreront ,je te le souhaite
en tous cas dommage pour le losc ils ont vraiment louper le bon coup sur le dernier match.
salut
 
- 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
17
Affichages
576
Réponses
4
Affichages
199
Réponses
2
Affichages
558
Retour