title: Find specific text in a cell
body: <p>I am new to this VBA for excel, anyway I'm trying to write some code that will iterate through the dataset until it comes to a specific text, in my example I'm looking to find the name "FRANKS" so I wrote some code which does that and it works, now I'm trying to figure out how to stop on that cell, copy it and append it to the cell next to it. Long story short, I have a report that runs every week and when certain employees names get split(text to columns) some names don't come out right. So I have to manually fix them. So here I am trying to automate it.
  Below is the code I have written so far.</p>
  
  <pre><code>      row_number = 0
  
   Do
   DoEvents
   row_number = row_number + 1
   namedperson = Range("C" &amp; row_number)
   Loop Until namedperson = "FRANKS"
   Columns("C &amp; row_number").Activate
  </code></pre>
  
  <p>the last line doesn't work but you get the idea of what I'm trying to do.
  Anyway after I grab this name "FRANKS" the column to the left of it is where I need to append the "FRANKS" to.....</p>
  
  <p>Thanks in advance,
  Lenny</p>