VBA – Impedir PEGAR en celda

Para evitar que el usuario ponga un valor no permitido en una celda con una «lista de validación de datos» tenemos que impedir que éste pueda pegar (Ctrl + V) en dicha casilla.

Con la siguiente macro desactivaremos cualquier valor que el usuario haya copiado (Cntrl + C) o cortado (Cntrl + X).

El código lo tenemos que escribir dentro de la hoja con el evento «Worksheet_SelectionChange»:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Cuando el usuario seleccione la celda(4,10)
'perderá cualquier celda copiada o cortada
    If Target.Row = 10 And Target.Column = 4 Then
    Application.CutCopyMode = False
    End If
End Sub