VBA代码剪切和粘贴

Question

用户可以在单元格中输入数据：

1. 通过从选项预定义列表中选择（滚动下拉列表）

2. 通过直接键入的字母数字值（所有数字，所有字母，或两者的组合）

3. 通过这样做复制（从其他文件）并粘贴到该小区的标识符

我不想给用户执行选项3的权利吗？有没有一个VBA代码来完成？

Excel一直有验证问题。他们的工作很好，当你需要有人从列表中选择或输入具体的数据，但瞬间从别人和粘贴在验证小区的用户拷贝数据，却忽视了验证，并允许它

Answer 1

下面是一个例子：

Private Sub Worksheet_Change(ByVal Target As Range) 
    Application.EnableEvents = False 
    If Target = Range("A1") Then 
     If Not (Target >= 1 And Target <= 10) Then 
      Application.Undo 
      MsgBox "Please enter value between 1 to 10", vbOKOnly + vbCritical 
     End If 
    End If 
    Application.EnableEvents = True 
End Sub