如何限制数据有效性的粘贴操作？

2025-05-11 08:08:05

推荐回答（1个）

回答1：

但可以利用VBA相结合的方式来进行。
首先，对需要进行数据输入的单元格取消锁定，然后再进行工作表保护。这样可以防止用户进行数据粘贴时删除原有的数据有效性设置。
然后对该表添加以下代码：
Private Sub Worksheet_Change(ByVal Target As Range)
For Each c In Target
If Not c.Validation.Value Then
Application.UndoExit ForEnd IfNextEnd Sub当数据发生变化时即进行判断，判断每个单元格Validation.Value 情况，即数据有效性的验证情况。如果不符合数据有效性设定，就取消刚才的操作，即数据粘贴。
当然，如果用户禁用VBA那就没辙了。操作方法和使用效果如动画所示：