How to highlight Active Cell in Excel using Conditional Formatting.

[omairhe]

Hey Excel Gurus,

I would like to know the formula for highlighting the active cell of my worksheet using Excel's built in Conditional Formatting rules.

Will appreciate and thank you.

 

[mumps]

I don't think that conditional formatting will work with the active cell. A macro can do what you want if you're interested.

 

[omairhe]

I don't think that conditional formatting will work with the active cell. A macro can do what you want if you're interested.

I am afraid that the vba code would not work without resetting the undo function . example (Ctrl+z).

 

[mumps]

I'm not sure what you mean by

resetting the undo function

Can you please clarify?

 

[omairhe]

But you do know what Undo (Ctrl+z) is? right?

 

[mumps]

I do know and also that any action performed by a macro cannot be undone. However, to do what you requested requires a macro so you have to decide which way to go.

 

[omairhe]

I do know and also that any action performed by a macro cannot be undone. However, to do what you requested requires a macro so you have to decide which way to go.

Well I would have to call it quits then ..
hence no code for my requirment.

 

[omairhe]

actually some actions can be undone after using the vba. but for what I requested meaning to highlight and edit the formatting of the cell or editing the content of the cell itself are irreversible with Undo.

 

[NoSparks]

Perhaps you could adapt Peter_SSs suggestion from here

 

[My Aswer Is This]

You can try this:
But it will remove all cells interior color except for the active cell.

The active cell will have a interior color of Green.

This is an auto sheet event script
Your Workbook must be Macro enabled
To install this code:
Right-click on the sheet tab
Select View Code from the pop-up context menu
Paste the code in the VBA edit window

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Modified  3/9/2019  6:47:30 PM  EST
ActiveSheet.UsedRange.Interior.ColorIndex = xlNone
Selection.Interior.ColorIndex = 4
End Sub