大神看过来看过来

这是公式得到的错误值，可以再加个iferror修正。或者F5定位-公式-错误，=↑，ctrl+enter。

假设你的数据是从j2到j100,找出非重复值到k列。假设在sheet1
vba代码如下：
Sub 查找()
Dim 单元格 As Range
Sheet1.Range("k2") = Sheet1.Range("j2") '数据的第一行肯定是没有重复的，直接取出来。
For Each 单元格 In Sheet1.Range("j3:j100") '此处修改sheet或者列或者数据的长度。注意从J3开始的。
If 单元格 = 单元格.Offset(-1, 0) Then
Else
单元格.Offset(0, 1) = 单元格
End If
Next
End Sub

测试结果如下
123 123
123
123
123
123
124 124
125 125
126 126
126
126
126
126

J2 键入公式
=IF(ISNUMBER(K2),K2,J1)
然后直接填充满了即可。

在J2中输入或复制粘贴下列公式
=IF(ISNA(K2),J1,K2)
或
=IF(ISNUMBER(K2),K2,J1)
下拉填充
或
CTRL+G或F5 定位条件 公式 错误值 确定
输入=和按向上键头
然后ctrl+回车
选择K列 复制 右键单击K1 选择性粘贴 数值 确定

数据，删除重复项

复制j列，在k列粘贴