Coloring a range, passing the mouse

[elsg]

Hi.
I wonder if it is possible to color the background of nonblank cells in a range, passing the mouse (maybe MouseMove Event)

 

[jamtay317]

1. select the range
2. push alt, o , d
3. use formula
4. copy and past this =not(a1="") this is assuming that your range starts in a1 if not adjust accordingly

 

[jamtay317]

i was wrong sorry, use this instead =(a1="")

 

[elsg]

not conditional formatting!!


Hovering the mouse over the range that has data cells that range will be colored

 

[kevatarvind]

try below code in Worksheet Module ( Right Click on Sheet Tab Then View Code And paste below code close)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
For Each cell In Selection
If cell.Value <> "" Then cell.Interior.ColorIndex = 6
Next
End Sub

 

[elsg]

Thanks, but not that.


In your code I have to do click in the cell.


What I want is: when you move the mouse over the cell

 

[kevatarvind]

Thanks, but not that.


In your code I have to do click in the cell.



What I want is: when you move the mouse over the cell

Without click no cell how can you select range ?

 

[elsg]

I do not want to select anything, I want to move the mouse (pass mouser), the cell

 

[kevatarvind]

sorry this beyond my ability some other can help may be thanks

 

[elsg]

while someone does not respond, then how do I use your code differently.


one that was clicked, the range will be colored.