How to highlight a cell when its content is changed?

[dikken20]

Hello,

I would like to highlight a cell in yellow background for half a second when its content is changed.

Is it possible?

Thanks

 

[EFANYoutube]

Hi Dikken

This is 1 second
Change the 5 to another color index you like
Please note, this must go in the sheet module you re wanting to affect: double clicking on Sheet1(Sheet1)

Private Sub Worksheet_Change(ByVal Target As Range)
OgColor = Target.Interior.ColorIndex
Target.Interior.ColorIndex = 5
Application.Wait (Now + TimeValue("0:00:01"))
Target.Interior.ColorIndex = og

End Sub

 

[My Aswer Is This]

Hi Dikken

This is 1 second
Change the 5 to another color index you like
Please note, this must go in the sheet module you re wanting to affect: double clicking on Sheet1(Sheet1)

Private Sub Worksheet_Change(ByVal Target As Range)
OgColor = Target.Interior.ColorIndex
Target.Interior.ColorIndex = 5
Application.Wait (Now + TimeValue("0:00:01"))
Target.Interior.ColorIndex = og

End Sub

That is a nice answer. It works for me. I have never use Application.wait.

 

[Fluff]

@EFANYoutube
There's a typo in your code when you reset the colour back to it's original state.

 

[EFANYoutube]

@EFANYoutube
There's a typo in your code when you reset the colour back to it's original state.

Hi Fluff
Thanks for the pickup

Private Sub Worksheet_Change(ByVal Target As Range)
OgColor = Target.Interior.ColorIndex
Target.Interior.ColorIndex = 5
Application.Wait (Now + TimeValue("0:00:01"))
Target.Interior.ColorIndex = OgColor

End Sub

 

[dikken20]

Hi Fluff
Thanks for the pickup

Private Sub Worksheet_Change(ByVal Target As Range)
OgColor = Target.Interior.ColorIndex
Target.Interior.ColorIndex = 5
Application.Wait (Now + TimeValue("0:00:01"))
Target.Interior.ColorIndex = OgColor

End Sub

Thank you so much for the reply.

Yet, I've just copied the code to the right sheet and it works only for manual cell modification. Yet, for cells that modified by DDE link (from a third party application) it doesn't work (I reason I need it is specific for a notification of the cell that modified by the third party application.

Is there maybe solution for this?

 

[EFANYoutube]

Hmm. That little nugget was not in your original post but if it is not triggering, it means that you 3rd party application may need to trigger it
I don't have any experence with DDE so i can't help sorry but I get what your tiring to do and it's going to look pretty cool when you get it working

 

[dikken20]

Hmm. That little nugget was not in your original post but if it is not triggering, it means that you 3rd party application may need to trigger it
I don't have any experence with DDE so i can't help sorry but I get what your tiring to do and it's going to look pretty cool when you get it working

Yes..
It is a trading system while I'm using it's data on my sheet via DDE.
Since I'm getting like bazillion info every millisecond I need to get this highlighting done to get my attention.
I hope there's any other option to make it trigger.
Thanks for your major help though!