extraction sans doublon

[daniel]

Bonjour le forum,

Je ne sais pas si mon titre est assez explicite pour le problème qui me turlupine...et pour lequel, une fois de plus, j'ai besoin de votre aide...

Dans une feuille, j'ai trois colonnes (Groupe, Sous-Groupe et Code). J'ai 30 codes : les 10 premiers appartiennent au groupe1, les dix suivants au groupe 2 et les dix derniers au groupe 3. Chaque groupe est divisé en deux sous-groupes.


J'aimerais grace à une macro VBA extraire les codes dans une autre colonne, ainsi que les noms de groupes et de sous groupes, mais que ceux ci n'apparaissent qu'une seule fois. Comme je me doute que mes explications ne sont pas des plus claires, j'ai joint un fichier avec le résultat que j'aimerais obtenir.

Si une âme charitable pourvait m'aider...

Bon week-end à toutes et tous

Daniel

 

[daniel]

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

 

[daniel]

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]

 

[Celeda]

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]

 

[Dan]

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]

 

[Hervé]

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

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

 

[Hervé]

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]

 

[daniel]

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

 

[daniel]

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