title: copy Array values That Meet a Condition to another column excel vba
body: <p>I want to copy a set of values from an array than meet the condition (values &lt; 70 for example) to the next column</p>
  
  <pre><code>'Qo reported (bd) - array
  For i = 0 To cap
  array_Qorep(i, 0) = Range("A" &amp; i + 1)
  Cells(i + 1, 3) = array_Qorep(i, 0) 'copy array in the next column
  If Cells(i + 1, 1).Value = Empty Then Exit For 'more values below, stop in blank
  Next
  </code></pre>
  
  <p>the problem is that i don't know how to apply the condition i want in the array and then copying to the next column, is there a way to delete the values that doesn't meet the condition from the array and then copy them?</p>
  
  <hr>
  
  <p>here is the solution for some reason it didnt work before but now it does :)
  , and thanks Absinthe </p>
  
  <pre><code>'Qo reported (bd)
  
  For i = 0 To cap
  array_Qorep(i, 0) = Range("A" &amp; i + 1)
  If Cells(i + 1, 1).Value = Empty Then Exit For
  If array_Qorep(i, 0) &gt; Cells(3, 4) Then
      Cells(i + 1, 3) = array_Qorep(i, 0)
      End If
  
  Next
  </code></pre>