Discussion :

[romichelamiche]

Bonjour,

Je souhaiterais connaitre la macro VBA qui permet de copier/coller le code "24B70X" chaque fois que l'on identifie des lignes en doublon:

Ligne Code Num de tel
1 0222346538
2 0222346538
3 24B70X 0222346538
4 0222346538

En fait mon fichier est constitué de milliers de lignes pour lesquelles on a des numéro de téléphones différents dont beaucoup sont en doublon, et chaque fois on a au moins un code associé à 4-5 lignes en doublon. Le nombre de lignes m'est essentiel, c'est pourquoi je ne supprime pas les doublons mais veux dupliquer les codes pour les lignes identiques.

Merci...

Romain

[Menhir]

Pas besoin de VBA pour ça.
En supposant que tes données soient en ligne 2:1000,
que les n° de téléphones soient en colonne C et que 24B70X soit à placer en colonne B.
Mets en B2 la formule :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=SI(NB.SI(C$2:C$1000;C2)=1;"";"24B70X")

Copier B2 vers le bas autant que nécessaire.

Mais si tu veux juste repérer les doubles, la mise en forme conditionnelle peut faire ça en 4 ou 5 clics.

[romichelamiche]

Bonjour Menhir,

merci pour ta réactivité.

Je connais cette fonction mais elle est limitée lorsque l'on dénombre plus de 500 codes pour environs 2000 numéros de téléphones...

En fait, je pensais passer par une macro pour ramener les codes des numéros de téléphones identifiques (= code varie en fonction de la cellule active et de la cellule qui lui succède) on ne peut pas passer par une formule simple pour ça?

Romain

PS: Code en Colonne A ; N°Tel en colonne B

[Menhir]

Je connais cette fonction mais elle est limitée lorsque l'on dénombre plus de 500 codes pour environs 2000 numéros de téléphones...

Je ne vois pas de quelle "limitation" tu parles.
J'ai déjà utilisé des NB.SI() sur les listes de données de plus de 10 000 lignes sans problème.

En fait, je pensais passer par une macro pour ramener les codes des numéros de téléphones identifiques (= code varie en fonction de la cellule active et de la cellule qui lui succède) on ne peut pas passer par une formule simple pour ça?

Il faudrait que tu précises quelle est la règle qui régit la variation de ces codes, mais, à priori, je ne vois pas pourquoi ce ne serait pas possible avec une formule.

[romichelamiche]

Je parle de limitation dans la mesure où l'on écrit en dur la valeur si faux du Code dans la formule SI. Or j'ai plus de 500 codes

Le code varie selon le numéro de téléphone. Ce que l'on constate dans mon fichier c'est que à chaque numéro correspond un code, en revanche celui-ci n'est pas dupliqué pour l'ensemble des numéros de téléphone en double.

Comprends-tu mon problèmes?


Par exemple (extrait):

Code:122222A Num:27861114407 (--> OK)
Code: Null Num:27861114407 (--> sur cette ligne je demande à retourner 122222A)
Code:13333A Num:+27861654321 (--> OK)
Code: Null Num:+27861654321 (--> sur cette ligne je demande à retourner 13333A)
Code: Null Num:+27861654321 (--> sur cette ligne je demande à retourner 13333A)

[Menhir]

Par exemple (extrait):

Code:122222A Num:27861114407 (--> OK)
Code: Null Num:27861114407 (--> sur cette ligne je demande à retourner 122222A)
Code:13333A Num:+27861654321 (--> OK)
Code: Null Num:+27861654321 (--> sur cette ligne je demande à retourner 13333A)
Code: Null Num:+27861654321 (--> sur cette ligne je demande à retourner 13333A)

Ta description n'est pas claire...

En partant du principe que le "code" apparaisse lors de la première occurrence du n° de téléphone, mettre en C2 :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=SI(A2="";SIERREUR(INDEX(A$1:A1;EQUIV(B2;B$1:B1));"");A2)

Copier vers le bas autant que nécessaire.