Multiple Lines in User form text box in Separate rows

Hi,
I have a scenario as below:-

1) Enter the multiple line in a text box
i.e.
4.2.2 Get & Stay Ready – File Transfer Management
4.2.3 Get & Stay Ready – Reference Data Management
4.2.4 Get & Stay Ready – Application & Security
4.2.5 Get & Stay Ready – Operational Schedules
4.2.6 Get & Stay Ready – Switch Migration and Supporting Transit Period

2) Those populated values in single cell to be placed into single row (based on newline??)
i.e.
Row A1 -> 4.2.2 Get & Stay Ready – File Transfer Management
A2 -> 4.2.3 Get & Stay Ready – Reference Data Management
A3 -> 4.2.4 Get & Stay Ready – Application & Security
A4 -> 4.2.5 Get & Stay Ready – Operational Schedules
A5 -> 4.2.6 Get & Stay Ready – Switch Migration and Supporting Transit Period

Is there any way i can do this in VBA?
Assuming the Sheet name is Sheet1, how can i accomplish this scenario?

Thanks before the reply.