[ExcelVBA]検索文字で検索し文字入力する
いつもお世話になっております。
以前に投稿をさせていただきましたgitmykと申します。
http://okwave.jp/qa/q7563274.html
前回はご回答くださり誠にありがとうございます。
この場で感謝申し上げます。
内容を精査させていただきましたので、再度投稿させていただきます。
問題(1)
Sheet2のA列に[範囲指定文字]、B列に[検索文字]、C列に[入力文字]が複数入っている。
Sheet1を[範囲指定文字]で検索しCurrentRegionで範囲指定する。
範囲指定した全てのセルに対し、[検索文字]の上から順に検索していく。
該当セルがあれば、右4セルoffsetし、対応する[入力文字]を入力する。
([検索文字]と[入力文字]は1対1で対応している)
問題(2)
Sheet2のA列に[範囲指定文字]、B列に[検索文字1]、C列に[検索文字2]、D列に[入力文字]が複数入っている。
Sheet1を[範囲指定文字]で検索しCurrentRegionで範囲指定する。
範囲指定した全てのセルに対し、[検索文字1]の上から順に検索していく。
該当セルがあれば、右2セル上1セルoffsetしたセルを対応する[検索文字2]で検索し、双方が一致した場合のみ[検索文字1]で検索した該当セルから、右に4セルoffsetしたセルに、対応する[入力文字]を入力する。
([検索文字1]と[検索文字2]、[入力文字]は対応している)
問題(3)
Sheet1を[範囲指定文字]で検索し下に1セルoffsetした位置をCurrentRegionで範囲指定した場合。
上記内容をExcelVBAでどのように記載すればよいか、ご教授くださいませんでしょうか。
VBA学習中です。
何卒宜しくお願いいたします。
お礼
二回も回答を書いてくださり、ありがとうございました。図入りでよくわかりました。