How to move selected data from column 1 to a different row in column 2?

[OldGrantonian]

I have Excel 10.0 in Windows 10 Pro.

I have one column of text values in Excel. I want to split that column into 2 separate columns.

The values were a single copy-paste from a web page.

A1 contains a title. A2 contains a few lines of text corresponding to A1

A3 contains a title. A4 contains the text corresponding to A3. And so on.

So, the contents of A2 must be moved to B1

The contents of A4 must be moved to B3. And so on.

I would like all the resulting empty rows to be deleted.

Thanks.

[AliGW]

Do you have the PowerQuery add-in?

[Mumps1]

Try:

Please Login or Register  to view this content.

[vshukla]

if you have data starting from cell A1. Enter the below code.If you have header in A1, replace A1 with A2 in the code and use it.
create a module and paste the below code.

Please Login or Register  to view this content.

[jindon]

Please Login or Register  to view this content.

[OldGrantonian]

.
As a courtesy to the generous volunteers, I tried all 3 macros.

Macros by @Mumps1 and @vshukla produced identical results - and exactly satisfied the requirements spec.

The macro by @jindon produced peculiar results. A description would be too time-consuming - sorry !!

Thanks to all contributors.

[Mumps1]

Glad to help.

[jindon]

The macro by @jindon produced peculiar results. A description would be too time-consuming - sorry !!

What are you talking about?

[OldGrantonian]

What are you talking about?

With your code, some cells with free text are converted to links, and some links are converted to free text.

Thanks.