若两个单元格的内容相同，则用第二个单元格的内容替换前一个单元格内容！并且自动找出表中全部的这样的单元格，并全部自动替换！
如A1=B1,就用B1替换A1！主要是要适用于全表
不胜感激
请zhzhf3076朋友发下宏代码。小弟头次用知道，没有财富值了。谢谢
实际问题是两列顺序是打乱的，每列500多个，我一个个的查得查多久啊！
追答那也不用替换呀，直接删掉那个单元格的内容就可以了，我是说用宏查找，不是你人为的查找
追问噢，那宏查找怎么用啊？具体代码怎么写？格式也行！我是个新手，不会这些的！谢谢!
追答你的意思表达得并不清楚，你说有二列顺序不同，到底是什么意思呀
是一列一列的查找吗？
其实实际问题是总共四列，第一列的单元格和第三列的单元格只是排列顺序不同，要找出其中所有相同的单元格，比如A1=C3，然后就用C3旁边的D3代替A1旁边的B1。再比如A2=C5，就用D5代替B2！共500多行要全部这么替换
追答那你的意思并不是说A列中有相同的值了，而是查找A与C列有是否相同
追问恩。是这样，不过只是找出相同的在哪，因为两列的内容相同，只是顺序不同而已!找出相同的然后用后面的那两个替换!如果行数少，我会用宏里面的if写出来，但行数太多要全部找出来不可能一个个的写代码。所以问问有没有能适用于全列的！
追答当然可以的，要宏代码吗？
Sub 替换()
r = Range("a65536").End(xlUp).Row
r1 = Range("c65536").End(xlUp).Row
For y = 1 To r
For yy = 1 To r1
If Cells(y, 1) = Cells(yy, 3) Then
Cells(y, 2) = Cells(yy, 4)
End If
Next
Next
End Sub