エクセルの設定か、関数かマクロで出来るでしょうか？

質問

エクセルの関数やマクロを勉強中です。

特定の列の、セル内の文字や数字を　一字でも変更した場合
そのセルだけ、背景色がグレーになる・・・

そんな事が、できるでしょうか？

ご回答を　お待ちしております！
よろしくお願いします。

回答No.2

tom04 · ベストアンサー

No.1のおっさんです。

たびたびごめんなさい。

前回のコードで
＞Selection.Interior.ColorIndex = xlNone
は不要でした。
これがあってもSelectしたセルの色はなくなりませんでした。
（無意味でした）

検証せずに投稿してごめんなさいね。m(_ _)m

お礼

そうなんですか（・▽・）

前のマクロでも　できましたよ！

一行　短くなるとゆうことですね。
それもまた、勉強になります（＾ワ＾）

ご丁寧に、ありがとうございました☆心から☆

回答No.1

tom04

こんばんは！
関数では無理だと思いますので、VBAでの一例です。
E列限定で良いですよね？

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 5 And Selection.Count = 1 Then
Selection.Interior.ColorIndex = xlNone
Dim buf As Variant
buf = Selection
If Target <> buf Then
Target.Interior.ColorIndex = 15
End If
End If
End Sub

一文字でも変更があれば25％グレーになるようにしてみました。
尚、一文字でも一旦削除して同じ文字を入力した場合は元データと変更ないのですが
その場合も色がついてしまいます。
要はそのセルを編集した場合に色が付きます。何もしない場合のも色が付きません。

それではダメですかねぇ～？m(_ _)m

お礼

お～っ！できました♪♪　ほんまに　すごい！

tom04さん　（＾▽＾）こんばんは☆
早速　考えてくださって、ありがとうございます！
お忙しいところ、いつも　すみません。

（＾ー＾）人　このような事は、
う～ん・・・できんのんじゃないかなぁ・・・（・＿・）・・・
と思ってたので驚きました。
短いマクロなのに、完璧で素晴らしいです♪

今から　また、教えて頂いたマクロを勉強します。
感謝しながら・・・・・m(u_u)m