EXCEL表格中要使某一区域内的文字信息不重复,如果有重复,则提示出错.应该怎么设置?

来源:百度知道 编辑:UC知道 时间:2024/07/07 13:43:05
如题.

比如A列输入时不重复,重复则提示。设置如下:
选中A列,点数据,有效性,自定义,公式栏中输入:=countif(A:A,A1)=1
出错警告中可以设置你在数据重复出错时的提示信息,确定就好了。
这样,当这一列中你输入的数据有重复的时候,就会输入失败,并提示错误。

如果这是一列现成的数据,这个方法就不太有效,你可以用条件格式解决,就是说让重复的数据单元格显示警告色,标志,这个单元格的数据在本列中是重复的。设置如下:
选中这一列,点,格式,条件格式,条件1中先公式,右边的栏内输入公式:=countif(A:A,A1)>1,然后点下边的格式,选择一种格式,比如,设置字体为红色,或设置图案中,单元格底色为红色等等。确定。
这样,当列中重复的单元格就会显示出不同的颜色。
你自己试试。

Private Sub Worksheet_Change(ByVal Target As Range)

'设定监测范围,本例为D1:D10。
If (Target.Column = 4 And Target.Row > 0 And Target.Row < 11) Then
Dim i As Integer
Dim mstr As String
For i = 1 To 10
'检测时跳过目标单元格。
If i = Target.Row Then GoTo nextfor
'多次重复输入,不重复报错。
If Left(Target.Value2, 5) = "**输入值" Then GoTo nextfor
'判断过程
If Cells(i, 4).Value2 = Target.Value2 Then
mstr = "**输入值“" & Target.Value2 & "”已存在于单元格D" & i & "