[[20160728153136]]　『変更・追加した文字の色を変える』（きくま）　ページの最後に飛ぶ

『変更・追加した文字の色を変える』（きくま）

ある進捗表を作っているのですが、

新たに入力した箇所や元のデータを変更した箇所の、
文字色が赤になるようにしたいです。

つまり、変更した箇所が赤文字によって一目でわかるようにしたいのです。

VBAなど使ったことがない超初心者です。
よろしくお願いします。

＜使用 Excel：Excel2007、使用 OS：Windows10 ＞

VBAより、「変更履歴の記録」を活用していかがですか。
（x） 2016/07/28(木) 15:56

下記のイベントプロシージャを使うことになると思います。

Private Sub Worksheet_Change(ByVal Target As Range)

End Sub

マクロを作成する上で、最低限、次の内容を明らかにしないと回答がつきずらいと思います。

・シートはひとつなのか？そのシート名は？
・色を変える対象のセル範囲は？
・保存は色を変えた状態で行うのか？
・オープンしたときには、どのような状態にするのか？（上の質問と関連しますが）
（メジロ） 2016/07/28(木) 15:58

回答ありがとうございます。
ご指摘いただいた点は以下の通りです。

勉強不足でお恥ずかしい限りです。。。

・シートはひとつなのか？そのシート名は？

  →文字色を変えたいシートは、シート名「入力」１つです。
・色を変える対象のセル範囲は？ 
　→「入力」シート全体です。
・保存は色を変えた状態で行うのか？
　→はい、そのまま保存したいです。 
・オープンしたときには、どのような状態にするのか？
　→前回終了時と変わらない状態で。

宜しくお願いします。

（きくま） 2016/07/28(木) 16:30

変更前のシートをコピーしておき、変更後と変更前のシートで、同じ位置のセルの値が一致していない場合は色を付ける条件付き書式を設定してはいかがでしょうか。私自身もよく使う方法ですよ。
（???） 2016/07/28(木) 16:54

Private Sub Worksheet_Change(ByVal Target As Range)

    Target.Font.Color = vbRed

End Sub

でも、やはり「変更履歴の記録」のほうがいいと思いますね…
（x） 2016/07/28(木) 16:55

ｘさま

申し訳ありません、最初にいただいた回答を見逃しておりました。

シート上のデータはかなり多く、
その中での変更点も１つや２つではないので、
やはり文字色やセル色などが変わったほうが見落としがないかと思いまして。

ご回答、ありがとうございます。

（きくま） 2016/07/28(木) 17:03

しつこいですが（笑）、新しいシートに変更箇所一覧作成の機能もありますから、色よりわかりやすいですよ。(^^)
（x） 2016/07/28(木) 17:09

変更箇所一覧の作成、やったことがないので試してみます。
ありがとうございます。
（きくま） 2016/07/28(木) 17:17

コメント返信：