Match names and make hierarchy

[Hremehre]

Hello Excel Forum

I have a worksheet with the following information:
Column A: List of employees
Column B: Supervisor of the employee

Each employee has a supervisor and this supervisor also has a supervisor etc etc until we reach the CEO who obviously has no supervisor. What i want is to make an organizational hierarchy.

Fx.

Name: Supervisor

Thomas Christian
Peter Thomas
John
Christian John


This hierarchy must then be: Peter, Thomas, Christian, John (with John as the top-man).

I have about 1000 employees and therefore i need to automatize this proces. I can't get a good idea from my head. Any help would be much appreciated!

Thank you in advance!

Hremehre

[Pete_UK]

Here's a link to a thread I contributed to recently on company hierarchies:

http://www.excelforum.com/excel-form...tablished.html

Perhaps that might give you some ideas.

Hope this helps.

Pete

[Hremehre]

Thank you but unfortunately i did not help me much. I'm new to VBA and i think there's too many differences between my sheet and the one in the linkj you sent.
I only have a long list of names and in the column next to it i have a list of supervisors. In a new column i have removed supervisor duplicates and found 79 supervisors. Now i want to match these 79 with the names column and see who their supervisor is and then do this again untill i reach the CEO. Any thoughts?

[millz]

See if this is what you want

[Hremehre]

I like it and it works but it does not give me the output i need.
I basically need the output to be the names listed in seperate cells and preferably starting from the "top-man". I actually don't care about who is the employees person but only which level they are on. (Level 1, Level 2, Level 3 down to the lowest ranked employee).
Like this:

Please Login or Register  to view this content.

And if another person was the same rank as Thomas (below Christian and above Peter) it would be like this

Please Login or Register  to view this content.

[millz]

Should do the job now.

[Hremehre]

It works brilliantly. Thank you so much for your hard work!