Find feature - Fill cells with color

[Guest]

Using the find feature, is there a way to automatically fill the cells with a
color that are found rather than just having the cells selected?

 

[Guest]

Once the cells are found (Selected)

Format > Cells > Patterns and then click a background color

 

[Guest]

Is there a way to automatically fill the cell that is forun without having to
format. I'm trying to find a way to make the cell stand out once it is found.

 

[Gord Dibben]

dford

Not without using VBA.

Sub find_and_color()
Dim rCell As Range
Dim whatwant As String
whatwant = InputBox("enter criteria. e.g dford or *for*")
Range("A1").Select
For Each rCell In ActiveSheet.UsedRange
If rCell.Value Like whatwant Then
rCell.Interior.ColorIndex = 6
End If
Next rCell
End Sub


Gord Dibben MS Excel MVP

 

[Ron de Bruin]

Or maybe this ? with Find
http://www.rondebruin.nl/find.htm#worksheet

 

[Dave Peterson]

If you're using xl2002+ or higher, you can use Edit|Replace and specify a format
for the "to" string.

Just replace a string with the same string and use that option to change the
format (on the pattern tab).

 

[Ron de Bruin]

I always forget that option Dave
Thanks for posting it

 

[Guest]

Worked great Dave. Thanks for the help.

If you're using xl2002+ or higher, you can use Edit|Replace and specify a format
for the "to" string.

Just replace a string with the same string and use that option to change the
format (on the pattern tab).

 

[Gord Dibben]

Neat trick!

Gord

If you're using xl2002+ or higher, you can use Edit|Replace and specify a format
for the "to" string.

Just replace a string with the same string and use that option to change the
format (on the pattern tab).