Hi Tony, Ottawa
Color palette is a workbook property. Try this little macro for a start, ran
from a yellow cell:
Sub Recolor()
Dim r As Long, g As Long, b As Long
Dim CelCol As Long
CelCol = ActiveCell.Interior.ColorIndex
If CelCol < 0 Then Exit Sub ' no color
r = Val(InputBox("How much red ?(0 - 255):"))
g = Val(InputBox("How much green ?(0 - 255):"))
b = Val(InputBox("How much blue ?(0 - 255):"))
ActiveWorkbook.Colors(CelCol) = RGB(r, g, b)
End Sub
(Several zeros or cancels will return black, so fill in sensible values)
Copying palettes from other workbooks can be done in the Tools > Options >
Color menu. For some theory on Excel color, see David's page
http://www.mvps.org/dmcritchie/excel/colors.htm
You may also consider upgading to 2007 in a year, that one will have lots of
color capabilities.
HTH. Best wishes Harald
"Tony Vella" <tony.vella@rogers.com> skrev i melding
news:2r6dnX0IwMZHA0HZnZ2dnUVZ_v6dnZ2d@giganews.com...
> I have a number of worksheets with some of the cells hi-lited bright
yellow.
> I find this rather hard on the eyes and would like to replace the bright
> yellow hi-lite with grey. Can this be done automatically by some command?
> I am using Excel 97 on an XP Home machine. Thanks in advance.
> --
> Tony Vella in Ottawa, Canada
>
Bookmarks