Makro najít+nahradit dle hodnoty v buňce Vyřešeno

[revol]

Ahoj, potřeboval bych poradit s makrem, které by dělalo prosté Najít a nahradit v určitě oblasti dle hodnoty zadané v buňkách. Tzn. text v buňce A1 Najít a nahradit ho textem v buňce A2. Díky moc za případnou pomoc

[Reklama]

[lubo.]

Použij zázmaník maker a nahraď hodnoty za What a Replacement. Např.:

Kód: Vybrat vše

Sub Makro1()
'
' Makro1 Makro
'

'
    Cells.Replace What:=[A1].Value, Replacement:=[B1].Value, LookAt:=xlPart, SearchOrder _
        :=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
End Sub