選択したセルと同じ値のセルがあれば目視で分かるように

マクロ / VBA

強調表示させる

下の図を見てもらったほうが早いと思いますが、同一シート内の同一値セルがあれば強調表示させてみます。
17-1.jpg
このようなデータがあります。一見しただけでは「123」というデータがどこにあるのか探しにくいです。そこでA1を選択すると、それと同じ値を強調表示させるようにします。
17-2.jpg
A2セルに選択を変えるだけでこうなります。
17-3.jpg

Worksheet_SelectionChange

Worksheet_SelectionChange・・・ワークシートで選択しているセルに変更があれば毎回この処理を行う。
これを使用し、セル選択だけで強調表示の変更を処理します。
VBE画面のプロジェクトエクスプローラで実行したいシートへ下記のコードを記入します。

①・・・Target.Cells.Countとは、いくつセルを選択しているか数字を返しますので、1以上であった場合はこの処理を中止します。
②・・・ここですべてのセルの罫線を消します。
③・・・空白、もしくは0の値の場合は処理を中止します。協調選択しません。
④・・・このFor文にて選択したセル値とシート内の同じ値のセルは赤罫線で囲う処理をします。
※注意※途中で罫線をすべて消す処理を行っていますので、もともと罫線を引いている場合は消えてしまいます。
対策としては文字色を変える事で強調表示させればいいかな・・・と思います。

コメントをどうぞ

メールアドレスが公開されることはありません。

チルダ 履歴書 XLSTART ワイルドカード 偏差値 VLOOKUP 配列数式 NA() SUM TODAY 図形 無料 印刷 テンプレート 封筒 標準報酬月額 目標 SUMIF コピペ ネットプリント コンビニ 検索 クイズ フロー図 作業効率UP バーコード COUNTIF COLUMN 条件付き書式 STDEV
  • 関西在住の30代サラリーマン。事務職で毎日Excelと戯れています。
    システム導入なんて資金が無い!Excelでなんとかやりたい零細中小の社長さん・事務員さんの力になればと思います。
    詳しいプロフィール


PAGE TOP ↑