Hi Matt,

Try inserting the additional code lines:

With Target
.Font.Bold = True
.Interior.ColorIndex = 3
End With

after:

If Not res = vbNo Then Me.Range(sAdd).Activate


---
Regards,
Norman


"matt4003" wrote in
message ...

Hello,

I really benifited from this example! It is really close to what I
need to do...but I have two quick add on questions..

1. If the cell change is accepted, how to I automatically change the
text to BOLD and RED??

2. Even if there is no previous change, I would like any change to any
cell in the range indicted with a change in text font and color.

Any thoughts?

Thanks,
Matt


--
matt4003
------------------------------------------------------------------------
matt4003's Profile:
http://www.excelforum.com/member.php...fo&userid=9635
View this thread: http://www.excelforum.com/showthread...hreadid=508707