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

Question

如题.

Answer 1

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

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

Answer 2

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 & "中！"
Target.Value2 = mstr
'设置字体颜色为红色。
Target.Font.Color = vbRed
GoTo nextfor
Else
Target.Font.Color = vbBlack
End If
nextfor: Next
Else
End If
End Sub

如：

中国
美国
伊朗
**输入值“美国”已存在于单元格D2中！
**输入值“伊朗”已存在于单元格D3中！
**输入值“中国”已存在于单元格D1中！