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

マクロ / VBA

強調表示させる

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

Worksheet_SelectionChange

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

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

コメントをどうぞ

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

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


PAGE TOP ↑