excel中如何使用VB对某些列数据的复制粘贴进行有效性校验

Question

为了防止复制粘贴导致数据有效性校验公式失效，现在表格中使用VB加入了如下限制，整个sheet页任何不符合要求的数据都进行了限制。我想知道如果只限制比如A列和C列进行数据有效性校验，其他列不进行限制，应该如何修改VB代码？
Private Sub Worksheet_Change(ByVal Target As Range)
Dim 单元格 As Range
For Each 单元格 In Target
If Not 单元格.Validation.Value Then
Application.Undo
MsgBox prompt:="粘贴的数据不符合该单元格的数据有效性要求！", Title:="输入提示"
Exit For
End If
Next
End Sub
或者有没有其他更好的VB代码？谢谢各位！

Answer 1

这个就要用到vba了，其实就是visual，basic，for，application。他的语言和VB差不多。

Answer 2

先假设你对VBA（EXCEL内嵌）有一定了解。。。在菜单-宏制作选择VB，在离开单元格事件进行检查（名字记不清了LEAVECELL？或者ENDEDIT？）

Answer 3

其实不必那么麻烦，直接用VBA进行数据验证，就没那么多事了。