Automatically add text to a table

[shokoufeh]

Hi every one

I need a lisp that adds the texts I select, to a pre defined table in Autocad.
In the attached file, I need to select texts in the "DRAWING TITLE" part, and add them to the first column of the table.

It would be great if the lisp, itself, can automatically select all of the mentioned texts and add them to the table. But if not, I can manually select the texts, and the lisp adds them to the table. 

Add Text to Table.dwg