Macro : Rendre confidentiel

Résolu/Fermé
skk201 Messages postés 938 Date d'inscription jeudi 11 septembre 2008 Statut Membre Dernière intervention 16 octobre 2016 - Modifié par skk201 le 11/08/2014 à 17:31
skk201 Messages postés 938 Date d'inscription jeudi 11 septembre 2008 Statut Membre Dernière intervention 16 octobre 2016 - 12 août 2014 à 16:33
Bonjour à tous,

J'ai une petite idée à vous proposer :

Crée une macro qui rend un plage de cellule confidentiel.

Souvent nous devons demander une copie de leur classeur Excel au personnes qui exposent leurs problèmes sur le forum. Certain sont retissant à cause de la confidentialité des informations contenues dans ce document.

Mon idée serait de faire une macro qui pour chaque cellules de la plage de cellules sélectionnée change aléatoirement le contenu de la cellule, mais en gardant le format.

Exemples :

Si la cellule contient : "Paule" on obtient : "Fgela" (Chaque lettre/chiffre est remplacée par une lettre/chiffre aléatoire.)
Si la cellule contient : "Paule - Admin" on obtient : "Mitzr - Massa"
Si la cellule contient : "456" on obtient : "782"
Si la cellule contient : "15.06.14" on obtient : "11.02.14"
Si la cellule contient : "34 €" on obtient : "25 €"
Si la cellule contient une formule : pas de changement.

Comme ça il suffira de transmettre cette macro au gens qui sont un peu retissant. Cela permet aussi d'avoir un aperçu du contenu du classeur au lieu d'un classeur vide avec juste des entêtes.

C'est juste une idée. Est-ce qu'il y a des gens interessé par ce projet ? Postez vous idées de code !

Merci à tous de votre attention

PS.- Ça serait aussi bien une macro qui ne fait que crypter
L'utilisateur écrit un chiffre puis que tout les cellule sélectionnée sont cryptées de la même manière.
Ainsi on peux conservé des groupes ou des valeurs se répètent.

Ce que change :
dans le premier 2 valeur identiques auront 2 "brouillage différents"
Paule = Saaer
Paule = Traew

Dans le 2e 2 valeurs identiques auront 1 unique cryptage
Paule = Qbvmf
Paule = Qbvmf
(Ici le cryptage avance la lettre d'une lettre dans l'alphabet)


*Vous pouvez mettre en forme votre code grâce à la flèche en haut a droite de l'éditeur de texte.
Pensez mettre vos messages en [Résolu] et cliquer sur le + des conseil qui vous ont été utiles."
A voir également:

1 réponse

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
Modifié par Patrice33740 le 11/08/2014 à 19:47
Bonjour,

A mon avis c'est une FBI (Fausse Bonne Idée) : Tout codage n'est efficace que le temps qu'il résiste, ce n'est pas suffisant pour assurer la confidentialité, d'autant moins que la simple présence d'un cryptage indique que les données sont confidentielles !!!
Cordialement
Patrice
1
skk201 Messages postés 938 Date d'inscription jeudi 11 septembre 2008 Statut Membre Dernière intervention 16 octobre 2016 54
12 août 2014 à 10:10
Bonjour, :)

Et pour l'idée de remplacer les données par des valeurs aléatoires de même type et même longueur ?

En un sens parfois c'est mieux que d'avoir une classeur vide ?
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
12 août 2014 à 13:53
C'est pas convivial et ça gène l'interprétation.

Par exemple ce code est moins compréhensible :
Function iiilliiiiill$(iiillliiiili$, iiillliillii%)
iiilliiiiill = iiillliiiili & IIf(iiillliillii > 1, "s", "")
End Function

que celui-ci
Function TexteConjugué$(Texte$, Quantité%)
TexteConjugué = Texte & IIf(Quantité > 1, "s", "")
End Function
et pourtant ce sont les mêmes

Il est préférable de remplacer les infos à la main quitte à écrire par exemple sur la première ligne Nom1, Prénom1, Adresse1, CP1, Ville1, il suffit ensuite de tirer vers le bas !
0
skk201 Messages postés 938 Date d'inscription jeudi 11 septembre 2008 Statut Membre Dernière intervention 16 octobre 2016 54
12 août 2014 à 16:33
Ok c'est vrai que vu sous cet angle ;)
Alors je vais mettre le sujet résolu.

Merci
0