Automatically Highlight the Active or Selected Cell

This macro will highlight the active cell in any excel spreadsheet with a color selected in the code. This means that any cell you select will be highlighted in a way that fills the cell in with color. This will also highlight any selection of cells from one to as many as you select and once you click away the highlight will disappear. This is great for giving presentations of for showing someone how to do something in excel, but only for worksheets with not previously colored cells - see Note.

Note: Using this macro will not allow you to apply background color to any cells in the workbook where this is used. This means that you will not be able to assign colors to particular cells unless you remove the macro. Additionally, any previously colored cells that are clicked on when this macro is being used will lose all color after the active cell moves to another cell. This means you will quickly lose the color for cells in previously colored worksheets.

Where to install the macro:  ThisWorkbook

Automatically Highlight the Active or Selected Cell

Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Excel.Range)

'Change the NUMBER in the line of code reading 
'"Target.Interior.ColorIndex = 3 " in order to get a
'different color to highlight the active cell. 

Static OldRange As Range

On Error Resume Next

Target.Interior.ColorIndex = 3 

OldRange.Interior.ColorIndex = xlColorIndexNone

Set OldRange = Target

End Sub

---