Row Scan and Print to Column

[Leipzig]

Hey guys,

I am trying to write a macro that takes text out of a row (with a variable number of cells with text) and prints it vertically in a column (redundancy for emphasis), while omitting any blank cells in between.
This means the row will and unlimited amount of cells text, and therefore, the given column to which the text is printed will have the corresponding unlimited amount of rows.

I have attached a spread sheet that explains what I want to do. Basically, I want it to take the names in row 1 and place them vertically, two columns after the last column that contains text (column X in the example), with printing starting in row 2.

Thanks for your help.Example.xlsmExample.xlsm

[Leipzig]

Bump

If I need to be more specific about my question, please let me know.

Thanks in advance.

[arlu1201]

Is this solved?

If you solve a problem yourself before anyone else has responded, please take a moment to describe your solution, chances are some other member will benefit.