Copy data from MS Word to Excel

[Krishna20]

I am looking for macro to copy data from Word to Excel
(not tables, pure text, for eg. my word document contains the following information
Hi,
Today is a great day
Keep smiling

this information should be copied to excel as A1 cell with Hi,
A2 with Today is great day ..... and so on)


Can you please help me out

Thanks
Krishna