Macro - Splitting Sentences In 2 Columns?

i need some macro code to split a sentences become 2 string/text, like this below :

assuming start data in col.a

sample raw (col.a)
after macro (splitting 2 text)
The Internet and media are closely controlled in China
The Internet and media are closely controlled in
China

The crackdown hit Chinese Internet stocks
The crackdown hit Chinese Internet
stocks

You can feel the pressure in Doha
You can feel the pressure in
Doha

It exploits data left in memory after an operation
It exploits data left in memory after an
operation

etc..

it's possible splitting a sentence become 2 string/text in 2 column (col.b & col.c as desired result). in col.c result based on last word a sentences..​