Break single row into multiple rows based on FORMAT

[Jacopo]

Dear all,
I'm quite new to VBA but really need a way to sort this out. Made a lot of googling but never found something to get through.
I have an excel sheet with a lot of information listed under the same column, where the entry title (the name of the person - NAME SURNAME) has a specific formatting, say Courier Bold 40.

The sheet is as follows (not all entries have all Subtitles):

A |
NAME SURNAME |
Subtitle 1 |
Subtitle 2 |
Subtitle 3 |
(Subtitle 4) |
|
NAME SURNAME |
Subtitle 1 |
Subtitle 2 |
Subtitle 3 |
(Subtitle 4)
....


What I am looking for is to create a spreadsheet where every A column contains NAME SURNAME, while all other information (subtitles) get reordered in the respective B, C, D, E, .... columns. Any idea?

A | | C | D | ....
NAME SURNAME | Subtitle 1 | Subtitle 2 | Subtitle 3 | ...


This is really a puzzle for me!

Thanks a lot!!