Application.CutCopyMode = False

hola, Nelson !

Quisiera que usando Application.CutCopyMode = False
me permitiera copiar y no me permitiera cortar [...]

prueba con las siguientes lineas [p.e.] EN el modulo de codigo de alguna hoja
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Application.CutCopyMode = xlCut Then Application.CutCopyMode = False
End Sub

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.