title: Find and FindNext for Excel VBA
body: <p>I've been stuck trying to figure out what to do with this, but basically I want a way to print out the value in column B given a specific value that matches column A. So for example:</p>
  
  <pre><code>Column A    Column B
  1           ABC
  2           DEF
  3           GHI
  1           JKL
  </code></pre>
  
  <p>I want to, after using find/findnext or whatever it is, to print out this string:</p>
  
  <pre><code>ABC JKL
  </code></pre>
  
  <p>I tried using </p>
  
  <pre><code>Set cellFound = ActiveWorkbook.Worksheets("sheet1").Range("F1:F1000000").Find("1")
  string = cellFound.Offset(0, 1).value
  </code></pre>
  
  <p>And I have a loop to loop through as many time as it needs to get all the rows taken care of. But with find it keeps returning me the same first string ("ABC") and the string ends up being ABC ABC instead of ABC JKL</p>
  
  <p>I tried using FindNext instead of find, but what I got is a 1004 Error. So I'm not really sure where I'm doing this wrong. Anyone has any idea?</p>