ExcelVBAで隣り合うセルが一致した行に色をつける
この記事では当方が実際にご相談いただいた内容をまとめております。
隣り合うセルが一致したデータを塗りつぶしたいという方向けの記事です。
目次
ExcelVBAで隣り合うセルが一致した行に色をつける方法
こんなことで困っていませんか?
隣り合うセルが一致した行に色をつけたい。けれども、条件付き書式で設定してもうまくいかない。
Excelの機能で隣り合うセルが一致した行を塗りつぶしたい。けれども、Excelの機能ではできそうにない。
条件付き書式でも隣り合うセルが一致した行を塗りつぶすことはできますが、ExcelVBAを駆使すればとてもシンプルに設定できます。
ExcelVBAで隣り合うセルが一致した行を塗りつぶす方法をまとめてみました。
ExcelVBAで隣り合うセルが一致した行に色をつけるコードの作成
「開発」タブをクリック
「Visual Basic」をクリック
「隣り合うセルが一致した行に色をつけるコード」の入力
隣り合うセルが一致した行に色をつけるコードの解説
まず隣り合うセルが一致した行に色をつけるためにどんな処理を実装しないといけないかを紙に書き出してみましょう。
今回のコードだと主に必要な処理は以下の2つです。
- 最終行まで繰り返す
- A列とB列が一致したときに行を塗りつぶす
ExcelVBAのコードだとわずか8行で書けます。
しかも処理も一瞬のため作業効率を上げたい場合は条件付き書式を使用するよりもExcelVBAでコードを作成した方が早いです。
プログラミング作成に慣れていないうちはコードを作成する前に紙に書き出して考えるようにしましょう。
ExcelVBAで隣り合うセルが一致した行に色をつけるボタンにマクロを登録
手順については「ExcelVBAでブックのシート名を検索して見つかったときにシートをアクティブにさせる方法」の記事の「シート検索ボタンにマクロを登録」を参照ください。
ボタンをクリックして隣り合うセルが一致した行に色をつけるマクロの実行
作成した「隣り合うセルが一致した行を塗りつぶしボタン」をクリック
隣り合うセルが一致した行が塗りつぶされます。
結論(まとめ)
「ExcelVBAで隣り合うセルが一致した行に色をつける方法」を解説しました。
- ExcelVBAで隣り合うセルが一致した行に色をつけるコードの作成
- ExcelVBAで隣り合うセルが一致した行に色をつけるボタンにマクロを登録
- ボタンをクリックして隣り合うセルが一致した行に色をつけるマクロの実行


最新記事 by mouri49 (全て見る)
- 【第68回】発達障害がバイナリーオプションでブログ記載の攻略法にて勝てますか? - 2021年1月26日
- 【第67回】発達障害(ADHD)が未経験でIT系にて起業できますか? - 2021年1月23日
- 【第66回】発達障害でハイローオーストラリアを始めたのですが、口座凍結は存在しますか? - 2021年1月19日
これから副業をはじめるならバイナリーオプション取引
ペイアウト倍率最大2.0倍
・業界最高水準のペイアウト倍率
・豊富な取引資産と取引種類
・オーストラリア金融当局の監督下にて営業
・取引開始でもれなく全員に5,000円キャッシュバック