title: VBA copy value in column B based on value in colum A and paste into another sheet
body: <p>I have a very specific request based on a spreadsheet with two columns. I want to search the values "Transaction Amount" and only the second "Name/Address" (not the first and third) field into a seperate sheet.  There are 37 of such wires in and I need it to run through each one. Any ideas?  This is what I have so far. It will copy based on transaction amount, but I also want it to copy the second name/address field and paste into the row in the next column.</p>
  
  <p>Thanks!</p>
  
  <pre><code>Sub cond_copy()
   'assuming the data is in sheet1
  Sheets("Sheet1").Select
  RowCount = Cells(Cells.Rows.Count, "a").End(xlUp).Row
  For i = 1 To RowCount
       'assuming the true statment is in column a
      Range("a" &amp; i).Select
      check_value = ActiveCell
      If check_value = "Transaction Amount" Or check_value = "Transaction Amount" Then
          ActiveCell.EntireRow.Copy
           'assuming the data is in sheet2
          Sheets("Sheet2").Select
          RowCount = Cells(Cells.Rows.Count, "a").End(xlUp).Row
          Range("a" &amp; RowCount + 1).Select
          ActiveSheet.Paste
          Sheets("Sheet1").Select
      End If
  Next
  </code></pre>
  
  <p>End Sub</p>
  
  <p><a href="http://i.stack.imgur.com/vD3FZ.png" rel="nofollow">http://i.stack.imgur.com/vD3FZ.png</a> </p>