我想检查A3中的文本是否与范围A5:A50中的任何其他单元格中的文本匹配。如果单元格匹配范围内的任何其他人将内容复制到“结果”表
如果是这样,我想将Y单元格的内容(与匹配A3的单元格的行号相同)复制到名为results的工作表的A列中的下一个空闲单元格中。它还需要在复制Y单元格时保持单元格颜色。
所有我能得到是把这个在目标单元格
= VLOOKUP(Sheet1!A3, Sheet1$A$5:$Y50, 25, TRUE)
,因为我需要在不同的名称来运行它多张所有不起作用。
我想检查A3中的文本是否与范围A5:A50中的任何其他单元格中的文本匹配。如果单元格匹配范围内的任何其他人将内容复制到“结果”表
如果是这样,我想将Y单元格的内容(与匹配A3的单元格的行号相同)复制到名为results的工作表的A列中的下一个空闲单元格中。它还需要在复制Y单元格时保持单元格颜色。
所有我能得到是把这个在目标单元格
= VLOOKUP(Sheet1!A3, Sheet1$A$5:$Y50, 25, TRUE)
,因为我需要在不同的名称来运行它多张所有不起作用。
with activesheet
for each c in .range("A5:A50").cells
if c.value = .range("A3").value then
c.offset(0,24).copy _
worksheets("results").cells(rows.count,1).end(xlup).offset(1,0)
end if
next c
end with
您可以列出sheetnames列表中的某个搜索采用了动态3D-VLOOKUP技术,命名该单元格范围MySheets,然后使用这样的结构:
=VLOOKUP(A3, INDIRECT("'" & INDEX(MySheets, MATCH(1, COUNTIF(INDIRECT("'" & MySheets &"'!A1:A50"), A3), 0)) & "'!A:B"), 2, 0)
有一个示例工作簿on my site演示了这一点。