formatting

  • Thread starter Thread starter KRK
  • Start date Start date
K

KRK

Hi, is it possible to automatically display those cells with a formula with
a different format. Eg I would like 'input' cells in green, and
'calculated' cells in red. Thanks.
 
Change color numbers to suit
Sub colorcells()
Dim c As Range
For Each c In Selection
If c.HasFormula Then
c.Interior.ColorIndex = 4
Else
c.Interior.ColorIndex = 6
End If
Next c
End Sub
 
Change  color numbers to suit
Sub colorcells()
Dim c As Range
For Each c In Selection
If c.HasFormula Then
c.Interior.ColorIndex = 4
Else
c.Interior.ColorIndex = 6
End If
Next c
End Sub

Hio can we change this macro, so that it automatically recognizes
where the data resides and do it itself, instead of selecting the
range by operator
 
Specify your range.
for each c in range("a2:x22")

If desired, send your workbook to my address and I'll take a look.

--
Don Guillett
Microsoft MVP Excel
SalesAid Software
(e-mail address removed)
Change color numbers to suit
Sub colorcells()
Dim c As Range
For Each c In Selection
If c.HasFormula Then
c.Interior.ColorIndex = 4
Else
c.Interior.ColorIndex = 6
End If
Next c
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software
in message

Hio can we change this macro, so that it automatically recognizes
where the data resides and do it itself, instead of selecting the
range by operator
 
Back
Top