OVH Cloud OVH Cloud

Tri, doublons et homonymes

16 réponses
Avatar
Stéphane
Bonjour,
J'ai 2 bases de données sous Excel : Mailing1.xls et Mailing2.xls contenant
chacune les mêmes champs (Nom, Prénom, Adresse etc...)
Il faut que je récupére les données de Mailing2.xls et que je les intègre à
Mailing1.xls en prenant soin d'éliminer les doublons et ne pas écraser les
homonymes.
Ca fait des lustres que je me torture les mèninges et je patauge.
Auriez vous une piste.

D'avance merci
Stéphane

6 réponses

1 2
Avatar
Stéphane
"Patrice Henrio" a écrit dans le
message de news:
Je l'avais prévue lors de la conception mais en déroulant la liste à


partir
de la fin je n'en ai pas eu besoin.

Si tu testes dis-moi si ça marche car je l'ai fait à l'aveugle.




J'ai testé après avoir corrigé une ou 2 fautes de frappe, mais bizarrement
il ne se passe rien, aucun message d'erreur, ça n'a pas l'air de tourner...

Stéphane
Avatar
Patrice Henrio
Il faut faire tourner en pas à pas, cela devrait dés le début modifier
quelque chose.
Je vais tester cela mais pas avant mercredi.
"Stéphane" a écrit dans le message de
news:bn1ip3$rgu$

"Patrice Henrio" a écrit dans le
message de news:
> Je l'avais prévue lors de la conception mais en déroulant la liste à
partir
> de la fin je n'en ai pas eu besoin.
>
> Si tu testes dis-moi si ça marche car je l'ai fait à l'aveugle.
>

J'ai testé après avoir corrigé une ou 2 fautes de frappe, mais bizarrement
il ne se passe rien, aucun message d'erreur, ça n'a pas l'air de


tourner...

Stéphane




Avatar
Stéphane
"Patrice Henrio" a écrit dans le
message de news:
Il faut faire tourner en pas à pas, cela devrait dés le début modifier
quelque chose.
Je vais tester cela mais pas avant mercredi.



Heu... c'est ma faute, ça marche quand on met les même colonnes de recherche
:-)
Pour ne pas alourdir la recherche j'avais enlevé la colonne "Genre" (M. Mme)
sur la feuille "Travail" mais javais oublié de le faire sur la "feuille 1".

Apparemment ça a l'air Ok sur une 100aine de lignes

Je te dis quoi sur la totalité des fichiers

Merci
Stéphane
Avatar
Stéphane
"Stéphane" a écrit dans le message de news:
bn1kue$ml9$

"Patrice Henrio" a écrit dans le
message de news:
> Il faut faire tourner en pas à pas, cela devrait dés le début modifier
> quelque chose.
> Je vais tester cela mais pas avant mercredi.

Heu... c'est ma faute, ça marche quand on met les même colonnes de


recherche
:-)
Pour ne pas alourdir la recherche j'avais enlevé la colonne "Genre" (M.


Mme)
sur la feuille "Travail" mais javais oublié de le faire sur la "feuille


1".

Apparemment ça a l'air Ok sur une 100aine de lignes

Je te dis quoi sur la totalité des fichiers

Merci
Stéphane



Petit bémol : après tri il s'avere que les noms qui sont contenus dans les 2
feuilles se retrouvent en double. Ceux qui ne sont que dans le fichier
"Travail" sont bien copiés une seule fois.

Stéphane
Avatar
Stéphane
> Petit bémol : après tri il s'avere que les noms qui sont contenus dans les


2
feuilles se retrouvent en double. Ceux qui ne sont que dans le fichier
"Travail" sont bien copiés une seule fois.

Stéphane




J'ai trouvé c'était dû à une petite erreur dans la boucle

For C = 1 To 5 'Ici mettre le nombre de colonnes nécessaires
Worksheets("Feuille 1").Cells(L, C) Worksheets("Travail").Cells(L - 1, C)
Next C
et non

For C = 1 To 5 'Ici mettre le nombre de colonnes nécessaires
Worksheets("Feuille 1").Cells(L, C) Worksheets("Feuille 1").Cells(L - 1, C)
Next C

Encore Merci.

Stéphane
Avatar
Patrice Henrio
Merci d'avoir testé, ça m'évite de le faire et si ça répond à ton pb tant
mieux.
Pour ma part quend j'ai ce type de pb je commence par regarder si en basic
pur et dur ça marche sans que cela prenne trop de temps parce que c'est ce
que je sasi le mieux faire. Je ne connais rien aux bases de données et aux
trucs genre ADO ouDAO ou ...

"Stéphane" a écrit dans le message de
news:bn3qqc$mce$

> Petit bémol : après tri il s'avere que les noms qui sont contenus dans


les
2
> feuilles se retrouvent en double. Ceux qui ne sont que dans le fichier
> "Travail" sont bien copiés une seule fois.
>
> Stéphane
>

J'ai trouvé c'était dû à une petite erreur dans la boucle

For C = 1 To 5 'Ici mettre le nombre de colonnes nécessaires
Worksheets("Feuille 1").Cells(L, C) > Worksheets("Travail").Cells(L - 1, C)
Next C
et non

For C = 1 To 5 'Ici mettre le nombre de colonnes nécessaires
Worksheets("Feuille 1").Cells(L, C) > Worksheets("Feuille 1").Cells(L - 1, C)
Next C

Encore Merci.

Stéphane




1 2