找出a 列 与b列相同的值, 把b列相同值同行的f列值 导入a列相同值同行的c列位置

如题所述

按ALT+F11,打开VBA编辑器,插入一个模块,放入如下代码,把光标停在代码中间,按F5运行。
Public Sub lwy()
For i = 1 To 10 '如果你A列的数据在A1:A10,具体根据实际自己修改一下。
For j = 1 To 10 '如果你B列的数据在B1:B10,具体根据实际自己修改一下。

If Cells(i, 1) = Cells(j, 2) Then
Cells(i, 3) = Cells(j, 6)
End If
Next
Next
End Sub
温馨提示:答案为网友推荐,仅供参考
第1个回答  2010-11-15
update table set c=f where a=b
相似回答