你的意思是在原表中提取不重复的数据出来,重复数据则只提取一次是吧! 这只能用VBA编程才能解决问题,如下: Sub 提取不重复的数据() m = 1 For i = 1 To 1000 For j = m To 1000 If Sheets(1).Range(\"A\" & i) <> Sheets(2).Range(\"A\" & m) And Sheets(1).Range(\"A\" & i) <> \"\" Then Sheets(2).Range(\"A\" & m) = Sheets(1).Range(\"A\" & i) m = m + 1 Exit For End If Next j Next i End Sub '要不你把文件发给我[email protected] 一定帮你解决问题!