Highlight Active Cell...With a Diffrence
Hello All,
I am trying to get a form of active cell highlight, but with a slight diffrence. I need the cell to remain coloured after it's not the active cell anymore. So in a nutshell, any cell that is clicked on, will stay the colour when it's no longer active. Thanks Peter |
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Target .FormatConditions.Delete .FormatConditions.Add Type:=xlExpression, Formula1:="TRUE" With .FormatConditions(1) With .Borders(xlTop) .LineStyle = xlContinuous .Weight = xlThin .ColorIndex = 5 End With With .Borders(xlBottom) .LineStyle = xlContinuous .Weight = xlThin .ColorIndex = 5 End With End With .FormatConditions(1).Interior.ColorIndex = 20 End With End Sub 'This is worksheet event code, which means that it needs to be 'placed in the appropriate worksheet code module, not a standard 'code module. To do this, right-click on the sheet tab, select 'the View Code option from the menu, and paste the code in. -- HTH RP (remove nothere from the email address if mailing direct) "Peter" wrote in message ... Hello All, I am trying to get a form of active cell highlight, but with a slight diffrence. I need the cell to remain coloured after it's not the active cell anymore. So in a nutshell, any cell that is clicked on, will stay the colour when it's no longer active. Thanks Peter |
All times are GMT +1. The time now is 04:16 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com