IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Petit algorithme d'anonymisation en VB


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Novembre 2005
    Messages
    11
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Novembre 2005
    Messages : 11
    Par défaut Petit algorithme d'anonymisation en VB
    Bonjour tous,

    J'ai un tableur de données sur Excel 2010 pour ma thèse en médecine, j'ai hélas rempli 450 lignes environ avec le nom des patients, je dois anonymiser ces derniers pour que le nom n'apparaisse pas.
    Pour se faire, je veux attribuer un code très simple pour chaque patient , le 1er de la liste aura le code "1", le deuxième "2" etc
    La petite difficulté c'est que un nom peut réapparaitre dans la liste, il faut alors attribuer le bon code déjà attribué.
    Pour m'économiser la labeur de le faire manuellement j'ai pensé à cet algorithme, mais je n'ai pas la compétence pour le coder en VB, pensez vous que cela soit possible ?



    Pour chaque Ligne x de la Colonne "Nom"
    		N = Nombre le plus grande dans la colonne "Numéro" + 1
    	Rechercher
    		Nom.x dans Colonne "Nom"
    			Si Nom.y = Nom.x
    				Si Numéro.y différent de ""
    					Alors Numéro.x = Numéro.y
    				Fin
    			Fin
    	Fin
    	Si Numéro.x = ""
    		Inscrire N dans Cellule Numéro.x
    	Fin

    Merci pour votre aide !

  2. #2
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    Pour un oneshoot, une macro VBA est rarement une idée très pragmatique.

    Une solution pour faire ça sans VBA.

    Tu copies ta liste de noms dans un autre onglet.
    Tu supprimes les doublons avec la commande "Supprimer les doublons" du ruban "Données".
    Dans la colonne de droite de cette liste, tu mets 1 dans la première cellule que tu tires vers le bas autant que nécessaire pour faire une suite numérique.
    Tu reviens dans ta liste source et tu utilises une fonction RECHERCHEV() pour assigner à chaque nom le code correspondant dans la liste à noms uniques.

    A mon avis, ça te prendre 2 min.
    Nettement plus rapide que de développer et tester une macro VBA.

  3. #3
    Membre expérimenté
    Homme Profil pro
    Étudiant
    Inscrit en
    Octobre 2018
    Messages
    254
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 29
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Octobre 2018
    Messages : 254
    Par défaut
    Bonjour,

    Plutôt que de créer une procédure que tu n'utiliseras qu'une seule fois, tu peux utiliser cette formule :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    =SIERREUR(RECHERCHEV(A3;A$1:$B2;2;FAUX);MAX($B$1:B2)+1)
    Pour que ça fonctionne, il faut que ton tableau soit construit de cette manière :

    Colonne A : Le nom de tes patients
    Colonne B : Leur numéro

    A toi d'adapter en fonction de ton fichier mais quoi qu'il arrive, ton nom de patient doit être avant son numéro

    Bonne journée à toi,

  4. #4
    Membre averti
    Profil pro
    Inscrit en
    Novembre 2005
    Messages
    11
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Novembre 2005
    Messages : 11
    Par défaut
    Merci j'ai réussi grâce à votre aide, j'ai décidément des progrès à faire sur Excel !

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Petit Algorithme En PHP
    Par radhi2002 dans le forum Langage
    Réponses: 7
    Dernier message: 04/05/2017, 08h36
  2. [Débutant] Petit algorithme à réécrire (DTW)
    Par Wenneguen dans le forum MATLAB
    Réponses: 15
    Dernier message: 31/05/2013, 17h48
  3. Besoin d'aide pour un petit Algorithme
    Par arnolem dans le forum Langage SQL
    Réponses: 13
    Dernier message: 28/02/2011, 16h15
  4. Besoin d'aide pour un petit Algorithme
    Par arnolem dans le forum Requêtes
    Réponses: 1
    Dernier message: 03/08/2010, 23h51
  5. [petit algorithme]Besoin d'aide
    Par Doom_aok dans le forum Mathématiques
    Réponses: 0
    Dernier message: 17/01/2008, 10h59

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo