セルが「結果」シート

Question

の範囲のコピーコンテンツで他のものと一致した場合、私は、A3内のテキストは、範囲A5内の他のセル内のテキストと一致するかどうかを確認したい：A50を。

それはIシートと呼ばれる結果の列に次の空きセルに（A3を一致セルと同じ行番号で）Yセルの内容をコピーしたいない場合。また、セルの色をコピーY細胞を維持する必要があります。

すべて

は、私は別の名前で複数のシートのすべてをそれを上で実行する必要があるとして、動作しない先のセル

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

でこれを入れていた可能性があります。

Answer 1

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 

Answer 2

あなたは細胞MySheetsの範囲に名前を付け、どこかのリストで検索するsheetnamesをリストアップすることでダイナミックな3D-VLOOKUP技術を使用して、このように構造物を使用することができます。

=VLOOKUP(A3, INDIRECT("'" & INDEX(MySheets, MATCH(1, COUNTIF(INDIRECT("'" & MySheets &"'!A1:A50"), A3), 0)) & "'!A:B"), 2, 0) 

これを実証するサンプルワークブックon my siteがあります。