Rows to colums

Need urgent help on an excel sheet moving rows to colums:

I have an excel sheet like below:

Alarm 1
Group N7900
Event_Severity All
Event_Name volume-space-reserve-nearly-depleted
Repeat_Notify Yes
Repeat_Interval 1800
Email_Addresses [email protected]
Alarm 2
Group N7900
Event_Severity All
Event_Name volume-space-reserve-depleted
Repeat_Notify Yes
Repeat_Interval 1800
Email_Addresses [email protected]

And wish the output to be like:

Alarm Group Event_Severity Event_Name Repeat_Notify Repeat_Interval Email_Addresses
1 N7900 All volume-space-reserve-nearly-depleted Yes 1800 [email protected]
2 N7900 All volume-space-reserve-depleted Yes 1800 [email protected]

Any help will be much appreciated.

Hi adyteo,

Thank you for your reply.
My list contains around 60 alarms all with the same rows. So converting each alarm from rows to columns can be performed although a better way to do it would be welcome. No idea about VBA code

Thank you adyteo for writing the macro. I have edited the macro to include 2 more fields and tested it. Everything works perfect as I needed. Your help is much appreciated.