VBAに関する質問掲示板です。未指定Sheet1に13列8000行位の文字列あありますこれに対してSheet2のA列のリストにあるもの検索して黄色に塗りつぶしたい。下記のようにSheet2のA1の内容を検索することはできましたがA2以降を次々に検索する方法がわかりません、お手数ではございますが、ご教授お願いします。23:16:54投稿していただいた"シートを検索"サブルーチンを少し変更して、他のサブルーチンから呼び出せるように関数化しました。その関数を"サンプル"サブルーチンのSheet2ループ内から呼び出すことで、Sheet2のA2セル以降も検索できるようにしています。09:28:42ありがとうございました。無事に完成いたしました。関する質問や疑問、それに対する解決方法など気軽に投稿してください。記事内ではHTMLのタグは使用できません。記事は一度投稿すると修正できません。内容を訂正したい場合は返信で対応してください。自動的にプログラムコードとみなし、枠で囲って見やすくします。関係ないことや、他人が不快に思うようなことなど、管理人が適当でないと判断した記事は削除する場合があります。239-programing.com▲PageTop。