How to paste the 4 lines in a single row in excel?

[Guest]

"APPASAMY KRISHNA HOSPITAL
DR RAJAKANNAN
OPP VIJAYA NAGAR BUS TERMINAL, 100 FT ROAD
VELACHERY, CHENNAI - 42"

above is the address. i want to paste this in a single row and to filter it
in area wise. please give some idea.

 

[Guest]

Perhaps this:

Sub Test()
Dim arr As Variant
arr = Split(ActiveCell.Value, Chr(10))
ActiveCell.Resize(1, UBound(arr) + 1) = arr
End Sub

Regards,
Greg