2012-02-27 53 views
0

我想檢查A3中的文本是否與範圍A5:A50中的任何其他單元格中的文本匹配。如果單元格匹配範圍內的任何其他人將內容複製到「結果」表

如果是這樣,我想將Y單元格的內容(與匹配A3的單元格的行號相同)複製到名爲results的工作表的A列中的下一個空閒單元格中。它還需要在複製Y單元格時保持單元格顏色。

所有我能得到是把這個在目標單元格

= VLOOKUP(Sheet1!A3, Sheet1$A$5:$Y50, 25, TRUE) 

,因爲我需要在不同的名稱來運行它多張所有不起作用。

回答

0
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 
0

您可以列出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演示了這一點。

相關問題