Macros para pegar solo valores en excel

Una macros para poder pegar solo valores, pero que aun con el menú contextual solo pegue valores o incluso dando enter también solo pegue valores.

Esto es lo que he investigado:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   If Application.CutCopyMode = xlCopy Then
      ActiveCell.PasteSpecial Paste:=xlPasteValues
   Else
      If Application.CutCopyMode = xlCut Then
         MsgBox "Operación no permitida"
      End If
   End If
   Application.CutCopyMode = False
End Sub