title: For each loop to go to next row in iteration once value found in range
body: <p>All, </p>
  
  <p>I have the below code which iterates through columns and rows to see <code>IF</code> the statement is true. It seems to be running through the whole code bringing back duplicate rows. I would like this code to go to the next row once a value has been found. </p>
  
  <p>I'm unsure how to adapt this code but I imagine the issue lies with the general for each loop I have set up any advise on how to fix this would be much appreciated. </p>
  
  <pre><code>Dim LR As Long
  LR = Workbooks(trackerName).Sheets("Results").Range("A1048576").End(xlUp).Row
  Dim LRC As Long
  LRC = Workbooks(trackerName).Sheets("Columnsforbox").Range("A1048576").End(xlUp).Row + 1
  For Each c In Workbooks(trackerName).Sheets("results").Range("A4:K" &amp; LR)
      If c.Value = UserName Or c.Value = UserId Then
          Worksheets("Columnsforbox").Range("A" &amp; LRC) = Worksheets("Results").Range("E" &amp; c.Row)
          Worksheets("Columnsforbox").Range("B" &amp; LRC) = Worksheets("Results").Range("D" &amp; c.Row)
          Worksheets("Columnsforbox").Range("C" &amp; LRC) = Worksheets("Results").Range("A" &amp; c.Row)
          Worksheets("Columnsforbox").Range("D" &amp; LRC) = Worksheets("Results").Range("B" &amp; c.Row)
          Worksheets("Columnsforbox").Range("E" &amp; LRC) = Worksheets("Results").Range("C" &amp; c.Row)
          LRC = LRC + 1
      End If
  Next c
  </code></pre>