| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
conditionla format based on cursor location
You're welcome. Thanks for the feedback.
"tt66" wrote in message ... Excelent Thanks "Trevor Shuttleworth" wrote: Try: Private Sub Worksheet_SelectionChange(ByVal Target As Range) Static c As Range Static ci As Integer If Not c Is Nothing Then c.Interior.ColorIndex = ci End If On Error Resume Next ci = Target.Cells(1).Offset(0, -1).Interior.ColorIndex Target.Cells(1).Offset(0, -1).Interior.ColorIndex = 36 Set c = Target.Cells(1).Offset(0, -1) On Error GoTo 0 End Sub Regards Trevor "tt66" wrote in message ... I found this great code to highlight the current location of a cell. I am not a code writer and have tried to adjust this code to highlight the cell immediatly to the left of the current cursor location, but have not been sucesfull. Private Sub Worksheet_SelectionChange(ByVal Target As Range) Static c As Range Static ci As Integer If Not c Is Nothing Then c.Interior.ColorIndex = ci End If ci = Target.Cells(1).Interior.ColorIndex Target.Cells(1).Interior.ColorIndex = 36 Set c = Target.Cells(1) End Sub |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| How to determine cursor location? | Excel Discussion (Misc queries) | |||
| Tracking cursor location | Excel Worksheet Functions | |||
| Function for cursor location | Excel Worksheet Functions | |||
| Cursor Location | Excel Discussion (Misc queries) | |||
| Cursor Location | Excel Programming | |||
Hybrid Mode
