Excel vba replace data in one time

Sub FindAndReplace() Worksheets("Output").Range("AZ:AZ").Select Selection.Replace What:=Worksheets("CodeTranslation").Range("A:A").Value, Replacement:=Worksheets("CodeTranslation").Range("B:B").Value, _ LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False End Sub

Видео Excel vba replace data in one time автора Эксель: советы от профессионалов