Hej Tommy,
Jeg har lidt i tvivl om hvad din makro udfører, derfor får du 'kun' makroen til Søg og Erstat
Sub Soeg_Erstat()
Fra = Range("E2").Text
Til = Range("F2").Text
Range("A4:AG703").Replace What:=Fra, Replacement:=Til, LookAt:=xlPart _
, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
End Sub
Kan du få det til at passe i dit ark?
//Allan