Drag and copy text in a cell

Hi,
Is there any way to drag the text present in a cell and paste in another cell. I found some code to drag and drop text. But, I want the text to remain in the initial position also.