|
>Loop さん
>ただ,
>> For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
>> MyStr = Range("F" & i)
>とA列の最終行を取得させてその回数分,F列の値を取得しているのに
>> ws1.Range("I8").Value = Application.WorksheetFunction.SumIf _
>> (ws2.Range("D1:D" & Rmax), ws1.Range("F8").Value, ws2.Range("G1:G" & Rmax))
>でF8だけを検索条件にしているのはなぜでしょう?
>結果も常にI8に出すようですし,ループの意味がないような気がしますが・・・
ごめんなさい、コマンドの書き方が分からなかったのです。
このように
"Sheet1"の"F8"を見て、同じ物を"Sheet2"の"D列"から探しだし、
その値を"Sheet2"の"G列"から拾う、ということをしたかったのです。
同じように、次は"Sheet1"の"F9"を見て、次は"F10"を見て、というように。
これを1つ1つではなく、LOOPで何か上手いこといかないか、と。
|
|