変更箇所の色が変わるような設定は可能ですか？

エクセル2010を使っております。

ある表において、値を書き換えると、そのセルの文字の色（もしくはセルの色）が変わるような設定をすることは可能ですか？

条件付き書式で、１つのセルずつ、そのような設定をすることが可能なのはわかりますが、範囲を指定して複数のセル範囲において、そのような設定を一発でする方法があればお教えください。

よろしくお願いいたします。

No.1 ベストアンサー 回答者： kybo 回答日時： 2014/08/12 17:15

標準の機能で

校閲→変更履歴の記録

からできます。

>範囲を指定して複数のセル範囲において、そのような設定を一発でする方法があれば

こういう事をしようと思うと、元データもどこかにおいておかねばなりません。
ので、Excel標準機能で行う方がベストだと思います。

この回答へのお礼

ありがとうございます。

エクセルでもこの機能はあったんですね。

しかし、やや使いにくいところがあるので、条件付き書式で設定できるとうれしいのですが、そういったことはできないのでしょうか。

お礼日時：2014/08/13 11:18

No.2 回答者： keithin 回答日時： 2014/08/12 20:09

準備：

ＡＬＴ＋Ｆ１１を押す
現れた画面で挿入メニューから標準モジュールを挿入する
現れたシートに下記をコピー貼り付ける

sub macro1()
　dim h as range
　for each h in selection
　with h.formatconditions
　.delete
　.add type:=xlcellvalue, operator:=xlnotequal, formula1:="=" & iif(isnumeric(h), h, """" &　h.value & """")
　.item(1).font.color = vbred
　end with
　next
end sub

ファイルメニューから終了してエクセルに戻る



＞そのような設定を一発でする方法

そのような設定をしたいセル範囲を選択する
ＡＬＴ＋Ｆ８を押してマクロを実行する

この回答へのお礼

ありがとうございます。

VBAの記述について伺ってもよろしいでしょうか。

for each
next
という点から、指定した範囲に一括で処理をするのではなく、繰り返しの処理をしているようですが、どのような動きになっているのでしょうか。

また、
「with h.formatconditions
　.delete
　.add type:=xlcellvalue, operator:=xlnotequal, formula1:="=" & iif(isnumeric(h), h, """" &　h.value & """")
　.item(1).font.color = vbred」

とはどのような意味でしょうか。

ご教授いただけると幸いです。

お礼日時：2014/08/13 11:50