extraction sans doublon

D

daniel

Guest

• 3 Septembre 2005

• #2

oups, le fichier n'est pas passé...je retente

 

Vote positif 0 Vote négatif

D

daniel

Guest

• 3 Septembre 2005

• #3

grrr ! toujours pas, pourtant, j'ai bien suivi le tutoriel... encore une fois, sinon, tant pis... [file name=groupesetcodes.zip size=5995]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/groupesetcodes.zip[/file]

 

Pièces jointes

• groupesetcodes.zip

  5.9 KB · Affichages: 33

Vote positif 0 Vote négatif

Celeda

XLDnaute Barbatruc

• 3 Septembre 2005

• #4

Bonjour,

m'en fous!!

na!!!

réalisé sans macros!!

(et sans trucage)

c'est du


Celeda!!


mais sans gloire car Daniel tu me l'as offert sur un plateau alors je te bise très fort!!

tirez-en de la graine oh nobles Chevaliers de l'Ordre de XLD!!

Si vous ne venez paas à moi,

j'irai à vous!!!!






🙂 🙂 🙂 🙂 🙂

faites pas attention c'est la chaleur et la chaleur de la prune!!! [file name=groupesetcodesTCD.zip size=7456]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/groupesetcodesTCD.zip[/file]

 

Pièces jointes

• groupesetcodesTCD.zip

  7.3 KB · Affichages: 41

Vote positif 0 Vote négatif

Dan

XLDnaute Barbatruc

Membre du Staff

Modérateur

• 3 Septembre 2005

• #5

Bonjour,

Sans trucage, revoilà ton fichier avec le même TCD que Celeda à la clé mais avec une macro. :woohoo:

- ouvre le fichier
- sur ton clavier tu fais CTRL + t

Cela te convient ?

😉 [file name=groupesetcodesTCD_v01.zip size=12325]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/groupesetcodesTCD_v01.zip[/file]

 

Pièces jointes

• groupesetcodesTCD_v01.zip

  12 KB · Affichages: 38

Vote positif 0 Vote négatif

Hervé

XLDnaute Barbatruc

• 3 Septembre 2005

• #6

Bonjour celeda, daniel, dan

Bon ben voilà la version vba (on pouvait quand meme pas laisser le terrain occupé par des TCD sans rien dire 🙂 )

Je suis parti du principe que tes données étaient toujours trié avant.

salut

le code :

Public Sub renvoi()
Dim tablo As Variant
Dim i As Integer

tablo = Range('a1').CurrentRegion

For i = UBound(tablo, 1) To 2 Step -1
If tablo(i, 1) = tablo(i - 1, 1) Then tablo(i, 1) = ''
If tablo(i, 2) = tablo(i - 1, 2) Then tablo(i, 2) = ''
Next i

Range('h1').Resize(UBound(tablo, 1), UBound(tablo, 2)) = tablo

Cliquez pour agrandir...

PS : attention daniel, y'a une erreur dans ton tableau, le code 20 appartient au groupe 2 et non au groupe 3

Message édité par: herve, à: 03/09/2005 16:59

 

Pièces jointes

• groupesetcodes_20050903165708.zip

  5.9 KB · Affichages: 33

Vote positif 0 Vote négatif

Hervé

XLDnaute Barbatruc

• 3 Septembre 2005

• #7

re

si je met pas le bon fichier, on va pas s'en sortir.

salut
[file name=groupesetcodesmacro.zip size=10744]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/groupesetcodesmacro.zip[/file]

 

Pièces jointes

• groupesetcodesmacro.zip

  10.5 KB · Affichages: 37

Vote positif 0 Vote négatif

D

daniel

Guest

• 3 Septembre 2005

• #8

bonsoir Celeda, Dan et Hervé !

Un grand merci à vous tous d'avoir trouvé une solution à mon problème ! Ca va d'ailleurs me donner l'occasion de me pencher sur les TCD, que je ne connais pas vraiment bien...

En tout cas, comme je vais devoir appliquer une de vos solutions sur plus de 800 codes, ça m'enlève une belle épine du pied, je me voyais mal faire tout ça manuellement ...

Bonne soirée et bon week-end

Daniel

 

Vote positif 0 Vote négatif

D

daniel

Guest

• 3 Septembre 2005

• #9

bonsoir Celeda, Dan et Hervé !

Un grand merci à vous tous d'avoir trouvé une solution à mon problème ! Ca va d'ailleurs me donner l'occasion de me pencher sur les TCD, que je ne connais pas vraiment bien...

En tout cas, comme je vais devoir appliquer une de vos solutions sur plus de 800 codes, ça m'enlève une belle épine du pied, je me voyais mal faire tout ça manuellement ...

Bonne soirée et bon week-end

Daniel

 

Vote positif 0 Vote négatif