Discussion :

[jbesclapez]

Bonjour a tous,

Je suis confronté à un problème où j'ai un gros document et je dois trouver la profondeur d'une hiérarchie entre un parent et un enfant.
Le document est ainsi
- En colonne A j'ai le parent
- En colonne B j'ai l'enfant
Et je dois trouver le niveau en colonne C

P	E	Niveau
A	A1	1
B	B1	1
A1	A11	2
A1	A12	2
A1	A13	2
A13	A131	3
B1	B11	2
B11	B112	3
B112	B1123	4

Avez-vous une macro magique pour m'aider à avoir ça automatiquement?

Merci de votre aide

[Kimy_Ire]

Bonjour jbesclapez,

Rien compris...

S'agit-il de trouver le nombre de chiffre placé après "l'enfant" ?
A1 = 1
B1 = 1
A11 = 2
A12 = 2
A13 = 2
A131 = 3
B11 = 2
B112 = 3
B1123 = 4

Kimy

[jbesclapez]

Salut Kimy,

je prends un autre exemple:

animaux	oiseaux	1
animaux	mammifere	1
mammifere	terrestre	2
mammifere	marin	2
terrestre	humain	3
terrestre	chat	3
terrestre	chien	3
marin	dauphin	3
marin	baleine	3
humain	homme	4
humain	enfant	4
humain	femme	4
homme	blond	5
homme	brun	5
brun	long	6

Tu peux un peu voir ça comme des dossiers avec des sous dossiers... et il y a une profondeur de dossier
Dans mon exemple pour te simplifier le compression j'ai trié en ordre de profondeur mais en réalité les données arrivent dans le désordre

animaux	mammifere	1
humain	enfant	4
mammifere	marin	2
terrestre	humain	3
terrestre	chat	3
marin	baleine	3
humain	homme	4
animaux	oiseaux	1
humain	femme	4
homme	blond	5
homme	brun	5
brun	long	6
mammifere	terrestre	2
terrestre	chien	3
marin	dauphin	3

La macro en lisant la relation parent - enfant connait la profondeur.
Tu peux aussi imager ça comme un arbre généalogique...

[unparia]

Bonjour

Tu peux aussi imager ça comme un arbre généalogique...

Tout-à-fait.
Et existe un contrôle dont c'est la vocation : le contrôle Treeview. Mais ce n'est pas un contrôle natif de VBA/Excel, mais un composant qu'il te faudrait importer et déclarer.
Il est bien sûr également possible de lui substituer d'autres objets combinés, mais au prix d'une lisibilité de qualité peu conviviale.

[unparia]

Ceci dit :
il se peut que tu trouves un intérêt (au demeurant réciproque) à travailler en binôme avec un membre qui, au même moment que toi (les problèmes sont apparemment comme les plantes; celles de mêmes espèces fleurissent au même moment ), a à traiter une problématique assez similaire --->>
https://www.developpez.net/forums/d1...sous-dossiers/

A Ryu (s'il passe par là) : tu as peut-être là l'occasion là de tenter de mettre en oeuvre (puisque Treeview n'est pas un contrôle natif de VBA/Excel) un certain procédé que je me rappelle t'avoir exposé ..(**********s de **********s) .
Il me semble bien, au "premier abord", qu'il puisse s'avérer assez utile dans le cas présent .Je te laisse faire

[unparia]

A jbesclapez
un résultat sur une feuille de calcul et comme celui-ci te conviendrait-il ? -->>

Et affichage de tout le chemin parent-enfant au clic sur n'importe quelle valeur enfant de ce tableau.
Si oui et si tu es prêt à y mettre du tien, nous verrons cela ensemble demain

[jbesclapez]

Salut unparia,
En fait non, il me faut simplement une colonne avec le niveau de profondeur des membres.
Merci de ton aide

[unparia]

Je ne comprends alors pas du tout.
Peux-tu montrer
- de quoi tu pars (copie d'écran)
- le résultat à obtenir (copie d'écran)
et :
expliquer la logique technique qui s'applique

[jbesclapez]

Je souhaite connaitre la hiérarchie en colonne C
Je te mets en dessous mon copier coller d'Excel car je pense que tu peux le remettre direct dans ton Excel...

Concernant les explications, c'est comme un arbre généalogique
La racine est 1
Les n branches collées à la racine sont 2
Les n branches collées aux branches qui sont collées à la racine sont 3....

PARENT	ID	Result
NY State	NY City	5
USA	NY State	4
North America	USA	3
South America	Chile	3
South America	Argentina	3
West Europe	France	3
West Europe	Italy	3
West Europe	Spain	3
West Europe	UK	3
East Europe	Letonia	3
East Europe	Ukraine	3
South Africa	Botswana	3
South Africa	Mozambique	3
North Africa	Tunisia	3
North Africa	Morocco	3
North Africa	Algeria	3
North America	Canada	3
America	North America	2
America	South America	2
Europe	West Europe	2
Europe	East Europe	2
Africa	South Africa	2
Africa	North Africa	2
	America	1
	Europe	1
	Africa	1

J'ai retrouvé aussi une vieille macro

Dans cette macro j'avais les enfants en colonne A et les enfants en colonne B. C est l'inverse de ce que je souhaite mais bon.,... cette macro n'était pas totale et n'allait pas jusqu'au bout,.... mais si ça peut aider...

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Dim iL%, i%, s$, ss$, sss$, o, oo, ooo
'identifier les continents et les sous-continents dans la colonne C
iL = Range("A" & Rows.Count).End(xlUp).Row
For Each o In Range("A2:A" & iL)
  If o.Offset(0, 1) = "" Then
  s = o.Value
  o.Offset(0, 2) = 1 'Level_1
    For Each oo In Range("B2:B" & iL)
    If oo.Value = s Then oo.Offset(0, 1) = 2 'Level_02
  '  If oo.Value = s + 1 Then oo.Offset(0, 2) = 3 'sous-continent
    Next
  End If
Next

[unparia]

Ce n'est pas ce que je t'ai demandé de montrer !

[jbesclapez]

Ce n'est pas ce que je t'ai demandé de montrer !

Ce que tu m as demande de montrer et sur le poste juste au dessus. Tu as bien les donnees de depart en A et B et le resultat attendu en C.

[unparia]

NON.
Une dernière fois :
montre :
- ce que tu as au départ (il est par définition sans résultat)
- ce que tu veux en résultat
- la logique qui conduit de l'un à l'autre.
Ou je te laisse personnellement sans aucun état d'âme à tes imprécisions.

[jbesclapez]

NON.
Une dernière fois :
montre :
- ce que tu as au départ (il est par définition sans résultat)
- ce que tu veux en résultat
- la logique qui conduit de l'un à l'autre.
Ou je te laisse personnellement sans aucun état d'âme à tes imprécisions.

Donc voila:

Depart


Resultat attendu


Logique
c est comme un arbre genealogique
La racine est 1
Les n branches collees a la racine sont 2
Les n branches collees aux branches qui sont collees a la racine sont 3....
Dans mon example America, Europe, Africa sont la racine car ils n ont pas de parent. C est le niveau 1
North Africa, South Africa ont pour parent Africa, donc ils sont niveau 2.
Botswana a pour parent south africa qui a pour parent Africa. Donc botswana est niveau 3.

J espere que c est plus clair

[unparia]

Réponse alors très nette --->>
Rigoureusement impossible à partir de la seule base montrée par ta première image.
Excel n'est ni une application dotée d'intelligence, ni Mme Soleil
Bonne chance dans tes démarches.

[mromain]

Bonjour jbesclapez, Kimy_Ire, unparia, le forum,

Bien qu'on soit dans le forum VBA, voici une solution en formule (ce qui parait plus simple) :

Code :

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

=SIERREUR(INDEX([Niveau];EQUIV([@Parent];[ID];0));0)+1

A+

[jbesclapez]

mrRomain, tu as tout a fait raison et j avais deja cette solution. Par contre je ne sais pas porter ca en VBA...

[unparia]

Vous voudrez bien m'excuser, mais ce qui est proposé là fait fi de certaines réalités.
Cela ne peut fonctionner que si aucun nom de la colonne de gauche ne se retrouve plus d'une fois dans celle de droite.
Or il est justement assez fréquent que cela soit le cas (plus d'une fois) en matière de classifications.
Non seulement plus d'une fois, mais &galement pas forcément avec la même "profondeur" dans sa "branche" d'appartenance.

Et cette problématique est la même, que ce soit par formule, par code, ou même avec intervention humaine.

[jbesclapez]

Un enfant n a qu un parent unique.
Donc la profondeur est la même...

Cette solution en formule fait le travail que je souhaite, mais c'est pas du VBA. :-)

[unparia]

Un enfant n a qu un parent unique

Cet aspect-là est forcément toujours vrai par définition. Et ce : quelle que soit la classification.

Que veux-tu donc dire par cette phrase ?

Je te parle d'autre chose : de deux "enfants" portant le même nom mais n'ayant pas le même "parent"

[jbesclapez]

Cet aspect-là est forcément toujours vrai par définition. Et ce : quelle que soit la classification.

Que veux-tu donc dire par cette phrase ?

Je te parle d'autre chose : de deux "enfants" portant le même nom mais n'ayant pas le même "parent"

Un ID enfant est unique.
Un ID parent est unique.