Hi,
How do I change the color in a cell.

something like....
after this...
xlBook.Worksheets(3).Range("A1") = Date()

i want to do something like this....
xlBook.Worksheets(3).Range("A1").forecolor = Red


thanks in advance,
bob mcclellan

With (range object).Interior
.ColorIndex = 35
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
End With

"John 3:16" wrote:

Hi,
How do I change the color in a cell.

something like....
after this...
xlBook.Worksheets(3).Range("A1") = Date()

i want to do something like this....
xlBook.Worksheets(3).Range("A1").forecolor = Red


thanks in advance,
bob mcclellan

xlBook.Worksheets(3).Range("A1").interior.color = vbRed

or
.... .color = RGB(255,0,0)

Tim


--
Tim Williams
Palo Alto, CA


"John 3:16" wrote in message
...
Hi,
How do I change the color in a cell.

something like....
after this...
xlBook.Worksheets(3).Range("A1") = Date()

i want to do something like this....
xlBook.Worksheets(3).Range("A1").forecolor = Red


thanks in advance,
bob mcclellan

Great !
thanks guys...
I really appreciate it.

bob mcclellan

"John 3:16" wrote in message
...
Hi,
How do I change the color in a cell.

something like....
after this...
xlBook.Worksheets(3).Range("A1") = Date()

i want to do something like this....
xlBook.Worksheets(3).Range("A1").forecolor = Red


thanks in advance,
bob mcclellan