私が問い合わせ管理をExcelでやっていて一番面倒だったのが、「同じ人（同じメールアドレス）の過去分・次の分を探す」作業でした。フィルターで絞っても並び替えや解除で行がズレたり、1件ずつ目視で探すのに時間がかかるんですよね。そこで、フォームコントロールのボタン2つ（前へ／次へ）を置いて、選択中の行と同じメールアドレスを持つ行へ移動するマクロにしました。 考え方はシンプルで、基準は「今選択している行（ActiveCell.Row）」です。例えばメールアドレスがC列なら、Cells(r1,"C").Value をキーにして、上方向（前へ）は r1-1 から2行目まで、下方向（次へ）は r1+1 から最終行までを順番にチェックします。一致したらその行のA列（No列など）をActivateして終了、という流れです。 運用してみて役立ったポイントをいくつか。 1) まず「メールアドレス列は必ず統一」 全角・半角スペース混入や大文字小文字の違いがあると一致しないことがありました。私は比較前に Trim と LCase を使って、両方同じ形に整えてから比較しています（例：key = LCase(Trim(Cells(r1,"C").Value))）。 2) 空白セル対策 問い合わせ行にメールアドレス未入力があると、空白同士でヒットしてしまうことがあります。keyが空ならメッセージを出して終了、みたいにしておくと安全でした。 3) テーブルの最終行取得 次へ検索は Rows.Count まで回すと重いので、Cells(Rows.Count,"C").End(xlUp).Row で最終行を取るのが実用的でした。問い合わせ件数が増えるほど効きます。 4) 「見つからない時」の挙動 前後に同じ人の行がないケースも多いので、何も起きないより「これ以上ありません」とMsgBoxを出す方が親切でした。 もし社内で「excel マクロ 修正 依頼」を受ける立場なら、この手のボタンは要望が出やすいです。列（メールアドレスがC列かどうか）と、移動先（A列に飛ぶか、行自体をSelectするか）だけ最初に確認して作ると、修正が少なく済みました。