Thread: OldCell colour
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
shiro[_2_] shiro[_2_] is offline
external usenet poster
 
Posts: 28
Default OldCell colour

With below code,I want turn the OldCell colour to
another colour if the cell's value was updated by user,
if it's not updated the colour is xlColorIndexNone,how to
modify the code?
Thank's in advance.


Option Explicit

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal
Target As Excel.Range)
Static OldCell As Range

If Not OldCell Is Nothing Then
OldCell.Interior.ColorIndex = xlColorIndexNone
End If

Target.Interior.ColorIndex = 6

Set OldCell = Target

End Sub