title: How to find E1 value in cloumn2 and then replace by column1 value using macro?
body: <p>I want to find the value available in <code>E1</code> cell into <code>column2</code> rows and then replace by <code>column1</code> value. For e.g. </p>
  
  <p>B2 value should be replaced from ABC-1 to A-1.
  B3 value should be replaced from ABC-1 to B-1</p>
  
  <p>and so on.</p>
  
  <p>I am new in macros.</p>
  
  <p>I was trying to put the code from internet</p>
  
  <pre><code>Sub FindReplaceAll()
  
  Dim fnd As Variant
  Dim rplc As Variant  
  
  fnd = "ABC"
  rplc = Cells(i, 8).Value
  
  Dim lastRow As Long
  lastRow = Cells(Rows.Count, 4).End(xlUp).row
  
  Dim i As Long
  
  For i = 2 To lastRow
      If Not IsEmpty(Cells(i, 4)) Then
            Cells.Replace what:=fnd, Replacement:=rplc
      End If
  Next
  
  End Sub
  </code></pre>