EXCELの条件付書式エクスポート

質問

EXCEL2003

シートに埋め込まれた条件付き書式の一覧をリストみたいな構成で確認できないものでしょうか？
Ａ３にㇾ無しの時、Ａ３セルの背景色は黄色
Ａ３にㇾが入った時、Ａ３セルの背景色を黄色→白色に変更、
Ｂ３セルの背景色を白色→グレー

Ｂ３にㇾ無しの時、Ｂ３セルの背景色は黄色
Ｂ３にㇾが入った時、Ｂ３セルの背景色を黄色→白色に変更、
Ａ３セルの背景色を白色→グレー
みたいな条件付き書式が、１シート上の複数セルに設定されているシートがあります。

条件付き書式が入ったセルを不用意にコピーされると、
条件不要なセルに条件付き書式が入っているかどうかわからなくなります。
１シートに設定されている条件付きを全て把握可能な方法はないでしょうか？

少なくともどこかのセルに式が入っているかどうかをリストみたいな構成で把握できたら
助かります。

Ａ３セルの条件内容
条件１が背景グレー
条件２が背景黄色

条件１：=IF($B$3="レ",1,0)　…（１）
条件２：=$A$3="" 　　　　　　…（２）

Ｂ３セルの条件内容
条件１が背景グレー
条件２が背景黄色

条件１：=IF($A$3="レ",1,0)　…（３）
条件２：=$B$3="" 　　　　　　…（４）

１ページ上の（１）～（４）の式を全て把握できないかという事です。
背景色等、他の条件まで把握できると良いですが、
式がトリガになるので条件付き書式セルを把握したいのです。

回答No.1

play_with_you · ベストアンサー

Sub ds()
　Dim c As Range, f As FormatCondition
　For Each c In UsedRange
　　If c.FormatConditions.Count > 0 Then
　　　For Each f In c.FormatConditions
　　　　Debug.Print f.Formula1
　　　Next
　　End If
　Next c
End Sub

みたいなことでしょうか。
出力先は適宜変更してください。
あとは
＞背景色等、他の条件まで把握できると良いですが
VBAのFormatConditionのヘルプを見れば書いてあります。

お礼

ありがとうございます。
大変助かりました。