activecell color

[alldreams]

what is the best way to change the color of the
activecell?

Thanks for your help.

 

[Frank Kabel]

Hi
activecell.colorindex = 3

 

[Bob Phillips]

Activecell.Interior.ColorIndex = 3

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

 

[Frank Kabel]

Hi
make this
Hi
activecell.interior.colorindex = 3

 

[alldreams]

I get this error:

Object doesn't support this object or method

Sub color()
ActiveCell.ColorIndex = 3
End Sub

I want the activecell, at all times, to be gray.

Any suggestions?

 

[alldreams]

this work. However, the color change remains after I
changed to a different cell. I want to dynamically
change the color of the activecell only

thanks!

 

[Bob Phillips]

You need VBA for this

Dim prev As Range

Private Sub Worksheet_Activate()
Set prev = ActiveCell
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

ActiveCell.Interior.ColorIndex = 15
prev.Interior.ColorIndex = xlColorIndexNone
Set prev = ActiveCell
End Sub


--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

 

[Frank Kabel]

Hi
for this you would need an event procedure. But maybe the following is
what you're looking for:

http://www.cpearson.com/excel/excelM.htm#HighlightActiveCell
http://www.cpearson.com/excel/RowLiner.htm

 

[Tom Ogilvy]

It might be worthy to note that an often undesirable side effect of this is
that you will lose the ability to undo edits as many macros cause the undo
history to zero out.