Excel FIND Command

[KarenH]

When I use the "find" command in Excel, the "found" cell or cells are barely
a shade different in color from the spreadsheet. It is almost impossible to
"see" the "found" cell. Is there a solution for this ? I don't think it was
this hard before Excel 2007.

 

[Jacob Skaria]

Karen; this is a know issue in Excel 2007 and Excel do not have a setting to
change this. One workaround is to add a background from menu Page
Layout>Background; but again you will have to add for this to all sheets.

 

[מיכ×ל (מיקי) ×בידן]

Karen,
You may consider to try the hereunder Macro.
This is one of the "simplest" way to accomplish what you are after.
The macro can be placed in your PERSONAL.XLS WorkBook in order to search in
any opened WB.
[Usually one adds custom keyboard shortcut to run the macro]
-----------------------------------------
Sub ColoredSearch()
SF = InputBox("Search for: ")
For Each CL In ActiveSheet.UsedRange
With CL
Set C = .Find(SF, LookIn:=xlValues)
If Not C Is Nothing Then
foundAddress = C.Address
Do
Range(C.Address).Select
TempCol = Selection.Interior.ColorIndex
Selection.Interior.ColorIndex = 6
MsgBox "Found in: " & C.Address
Selection.Interior.ColorIndex = TempCol
Set C = .FindNext(C)
Loop While Not C Is Nothing And C.Address <> foundAddress
End If
End With
Next
End Sub

 

[מיכ×ל (מיקי) ×בידן]

In "Excel 2007" it is called: PERSONAL.XLSX
http://support.microsoft.com/default.aspx/kb/822107
Micky

Karen,
You may consider to try the hereunder Macro.
This is one of the "simplest" way to accomplish what you are after.
The macro can be placed in your PERSONAL.XLS WorkBook in order to search in
any opened WB.
[Usually one adds custom keyboard shortcut to run the macro]
-----------------------------------------
Sub ColoredSearch()
SF = InputBox("Search for: ")
For Each CL In ActiveSheet.UsedRange
With CL
Set C = .Find(SF, LookIn:=xlValues)
If Not C Is Nothing Then
foundAddress = C.Address
Do
Range(C.Address).Select
TempCol = Selection.Interior.ColorIndex
Selection.Interior.ColorIndex = 6
MsgBox "Found in: " & C.Address
Selection.Interior.ColorIndex = TempCol
Set C = .FindNext(C)
Loop While Not C Is Nothing And C.Address <> foundAddress
End If
End With
Next
End Sub
--------------
Micky

When I use the "find" command in Excel, the "found" cell or cells are barely
a shade different in color from the spreadsheet. It is almost impossible to
"see" the "found" cell. Is there a solution for this ? I don't think it was
this hard before Excel 2007.

 

[Bill Sharpe]

Karen; this is a know issue in Excel 2007 and Excel do not have a setting to
change this. One workaround is to add a background from menu Page
Layout>Background; but again you will have to add for this to all sheets.

Known issue?
There's a big highlight border around the cell with the search term in
it when I use Find in Excel 2007. I haven't added any background to my
Excel sheets.

Bill