Vba 匹配两个不同Excel工作表中的字段

Vba 匹配两个不同Excel工作表中的字段,vba,excel,Vba,Excel,因此,我有一个Excel文件,其中包含多个工作表,如果名称匹配,如何匹配sheet1列A和sheet2列B中的字段?将名称添加到sheet3 基本上,我在Sheet1和Sheet2中有不同标准的学生,但是我想从Sheet1和Sheet2中找到副本,并将这些副本扔到Sheet3中 同样的问题: 如何在B列中找到名称并在C列中将该值更改为其他值。 例如: Column B Column C Sam Ziva Jen Tiva Leo Mi

因此,我有一个Excel文件,其中包含多个工作表,如果名称匹配,如何匹配sheet1列A和sheet2列B中的字段?将名称添加到sheet3

基本上,我在Sheet1和Sheet2中有不同标准的学生,但是我想从Sheet1和Sheet2中找到副本,并将这些副本扔到Sheet3中

同样的问题: 如何在B列中找到名称并在C列中将该值更改为其他值。 例如:

Column B     Column C
Sam          Ziva
Jen          Tiva
Leo          Miva
所以如果在B列中有Sam这个名字,我想在C列中将它命名为Ziva
我用简单的IF语句进行了尝试,但它只查找1个字段。

类似的东西可以工作。或者,您可以根据注释使用Vlookup替换内部循环

dim idx1 as integer
dim idx2 as integer
dim idx3 as integer
idx1 = 2
idx3 = 1
while sheets("Sheet1").Range("A" + Cstr(idx1)).Value <> "" 
    idx2 = 2
    while sheets("Sheet2").Range("B" + Cstr(idx2)).Value <> ""
        if sheets("Sheet1").Range("A" + Cstr(idx1)).Value = sheets("Sheet2").Range("B" + Cstr(idx2)).Value then
            idx3 = idx3 + 1
            sheets("Sheet3").Range("C" + Cstr(idx3)).value = sheets("Sheet1").Range("A" + Cstr(idx1)).Value
        endif
        idx2 = idx2 + 1
    wend
    idx1 = idx1 + 1
wend
dim idx1作为整数
作为整数的dim idx2
将idx3设置为整数
idx1=2
idx3=1
而板材(“板材1”)。范围(“A”+Cstr(idx1))。值“”
idx2=2
而板材(“板材2”)。范围(“B”+Cstr(idx2))。值“”
如果板材(“板材1”).范围(“A”+Cstr(idx1)).值=板材(“板材2”).范围(“B”+Cstr(idx2)).值,则
idx3=idx3+1
板材(“板材3”)。范围(“C”+Cstr(idx3))。值=板材(“板材1”)。范围(“A”+Cstr(idx1))。值
恩迪夫
idx2=idx2+1
温德
idx1=idx1+1
温德

看看VLOOKUP函数。