Find / Replace with Name Range References

[Anne Troy]

I've checked the KB and either it doesn't exist, or I am misunderstanding.

What I want to do is take, for instance:

=Report!H7

and replace with...

=ValuationDate

Throughout an entire workbook.

[johnske]

Sub ReplaceIt()
Dim Sheet As Worksheet
For Each Sheet In Worksheets
Sheet.Activate
Cells.Replace What:="=Report!H7", Replacement:="=ValuationDate", _
SearchOrder:=xlByColumns, MatchCase:=True
Next Sheet
Set Sheet = Nothing
End Sub :)

[Anne Troy]

Terrific!! Please add to the KB. :)