标记无效单元格使其无法撤消

时间:2015-03-10 16:15:33

标签: excel vba validation excel-vba

我有一些验证细胞,但可以通过粘贴将无效数据输入细胞。当用户将数据粘贴到单元格中时,如果数据无效,我想将单元格变为红色,或者如果数据有效,则将其恢复为白色。

我正在使用以下工作表事件:

Private Sub worksheet_change(ByVal target As Range)

If Not target.Validation.value Then
    target.Interior.ColorIndex = 3
Else
    target.Interior.ColorIndex = 2
End If

End Sub

这会执行所需的颜色更改,但也无法撤消。有没有办法实现这种类型的单元格着色,同时仍允许用户撤消粘贴操作?

1 个答案:

答案 0 :(得分:0)

根据PaulFrancis的回答,我能够使用条件格式化完成此任务。