Allow click and drag AND copy and paste

[tiredofit]

Adding this code allows users to click and drag:

Private Sub Workbook_Deactivate()

     Application.CellDragAndDrop = True

End Sub

However, if I copied a cell in this workbook, hit Ctrl + N, then try to paste in another workbook, nothing gets pasted.

How can I resolve this?

Thanks