条件付き書式で変更されたセルの色をvbaで取得したい

Question

製品マスターへのデータ登録ツールを作っています。

1. 必要項目（複数）を入力する
2. 条件付き書式を使って入力項目の不備があったセルには色をつける
3. 入力が済んだらマスター登録をvbaで行う

このような流れになっているのですが
条件付き書式を利用して入力エラーを警告しつつ
さらにマスター登録のマクロの中でもう一度
エラー項目が残っていないかチェックしたいと考えています。

しかし
条件付き書式のチェックで着色されたセルも
vbaで .interior.colorindex を取得すると
塗りつぶしなしになってしまいます。

条件付き書式で変更されたセルの色をvbaで取得する方法はありますでしょうか？

あるいは
もっと賢い方法がありましたら
（たとえば条件付き書式に引っかかっている限りマスター登録の実行ボタンを押せない等）
教えていただけると幸いです。

Comments

[makox0105]

全てVBAで処理しない理由はあるのでしょうか？

[退会済みユーザー]

すべてVBAで処理しないのは
本作業に携わる人がマクロを使えないので（私はツールを作るだけ）
小さな変更が合ったときに条件付き書式のほうが望ましい
と言われたからなのです。

Answer 1

DisplayFormatに表示中の状態が保持されているようです。
背景色であればDisplayFormat.Interior.Colorで取得できます。

Debug.Print Range("A1").DisplayFormat.Interior.Color

Comments

[退会済みユーザー]

できました！
全く知りませんでした。ありがとうございました。