I want to perform a search of entire spreadsheet and when a specified value
is found a replace is performed in a specified cell of a specified value. I
want to code this in VB to be used as a macro.

Examples?

--
Don Guillett
SalesAid Software
(E-Mail Removed)
"Laurie Born" <Laurie (E-Mail Removed)> wrote in message
news:3A6EF0AC-A4CB-4523-96AD-(E-Mail Removed)...
>I want to perform a search of entire spreadsheet and when a specified value
> is found a replace is performed in a specified cell of a specified value.
> I
> want to code this in VB to be used as a macro.

This might work. You will have to change a couple of items in the code where
I have so noted.

Sub srchWks()
Dim myRng As Range, myVar As Variant
Dim RangeToChange As Range, newValue As Variant
RangeToChange = Cells(5, 5) '<<< Change to actual
newValue = "Hello" '<<< Change to actual
Set myRng = ActiveSheet.UsedRange
With myRng
Set c = .Find(myVar, LookIn:=xlValues) '<<< Define myVar
If Not c Is Nothing Then
fRng = c.Address
RangeToChange.Value = newValue
End If
End With
End Sub

"Laurie Born" wrote:

> I want to perform a search of entire spreadsheet and when a specified value
> is found a replace is performed in a specified cell of a specified value. I
> want to code this in VB to be used as a macro.