How to programatically transpose Rows into Columns

[naeemdotcom]

Hi All,

Here is a sample sheet. I am interested in doing following steps by VBA code.

1. Delete all ROWS in which Column AB is empty.
2. Select and Copy Column AB of all ROWS in which Column AB has text starting string "R000-" or "R020-" or "R040-" or .... upto ""R580-".
3. PASTE these ROWS in separate sheet.
4. Delete duplicate ROWS.
5. Delete the first 5 characters (headers) of all these rows.
6. Convert the Text-to-column conversion of the text at fixed width of length 3.
7. This will give us 20 columns, since the length of the text is 60 numeric characters.
8. Transpose these into 1 column. Ultimately the column will have 600 entries.

Any help would be highly appreciated.