Home |
Search |
Today's Posts |
#1
|
|||
|
|||
How do I shade cells during selection?
I am trying to shade cells only when they are selected unless I specify them
to be shaded all the time. Is this possible? I am using Excel 2003 |
#2
|
|||
|
|||
try this. Right click sheet tabview codeinsert thisSAVE workbook
'McCurdy.Here is something inspired by Don Guillett. Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim MyRng As Range Set MyRng = Target.EntireRow Application.EnableEvents = False On Error GoTo end1 Application.Cells.FormatConditions.Delete With MyRng .FormatConditions.Add Type:=xlExpression, Formula1:= _ "=ROW()=ROW(INDIRECT(CELL(""address"")))" With .FormatConditions(1).Font .Bold = True .Italic = False .ColorIndex = 1 End With .FormatConditions(1).Interior.ColorIndex = 36 End With end1: Application.EnableEvents = True End Sub -- Don Guillett SalesAid Software "MysterTLC" wrote in message ... I am trying to shade cells only when they are selected unless I specify them to be shaded all the time. Is this possible? I am using Excel 2003 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Why "center across selection" rather than "merge" cells? What is. | Excel Discussion (Misc queries) | |||
random selection from a range of cells | Excel Worksheet Functions | |||
How do I automatically shade cells depending on data entered? | Excel Worksheet Functions | |||
How do I shade cells using the "IF" function? | Excel Worksheet Functions | |||
How to shade a row of cells using conditional formatting | Excel Worksheet Functions |