Thread: Font color
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.misc
Gord Dibben Gord Dibben is offline
external usenet poster
 
Posts: 22,906
Default Font color

You could use event code to color the font when you make changes.

Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo ws_exit:
Application.EnableEvents = False
If Not Intersect(Target, Me.Range("A1:A10")) Is Nothing Then
With Target
If .Value < "" Then
.Font.ColorIndex = 3 'red
.Font.Bold = True
End If
End With
End If
ws_exit:
Application.EnableEvents = True
End Sub

Right-click on the sheet tab and "View Code".

Copy/paste the code into that sheet module.


Gord Dibben MS Excel MVP

On Wed, 15 Nov 2006 08:43:01 -0800, mtm640
wrote:

how to change the font color in an existing work book while doing editing.
which will enable you to varify the cell you have edited.