Highlight Cells Matching Selected Cell

Chimero · Feb 17th 2008

Hello,

I don't know if the Title provided is correct or not. Please accept my apology if it is not.

I would like to select a cell inside my workbook and when it is selected it automatically highlights similar value cells in the same workbook. Is that possible?

A Look at the attachment should give you a much better idea as to what I am talking about.

Regards,

Chimero

**PCI** · Feb 17th 2008

Re: Selecting Cell Highlights Similar Values In Workbook

Here a quick possibility using what you prepared:

Code

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells(2, 1) = Selection.Value
End Sub

To be installed in the sheet code

p45cal · Feb 17th 2008

Re: Selecting Cell Highlights Similar Values In Workbook

remove conditional formatting from within the red box and put this code in the sheet's code module:

Code

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Set myrng = Range("C2:H10")
myrng.Interior.ColorIndex = xlNone
If Not Intersect(Target, myrng) Is Nothing Then
  If Target.Cells.Count = 1 Then
  For Each cll In myrng.Cells
      If cll.Value = Target.Value Then cll.Interior.ColorIndex = 15
    Next cll
  End If
End If
End Sub

Display More

see attached, p45cal.

Chimero · Feb 18th 2008

Re: Highlight Cells Matching Selected Cell

Thank You very much for such prompt replies.

It works like a charm.

Amazing, that all I needed to do was ask.

Thank you once again for your help.

You Guys ROK!!!!!!!!!
Regards,

Chimero

Highlight Cells Matching Selected Cell

Participate now!

Share