title: How to redirect rejected rows to another file?
body: <p>This is my Source <code>csv</code> file</p>
  
  <pre><code>col1,col2,col3,col4,col5,col6
  1,A,AA,X,Y,H
  2,B,,,CC,D, -- reject this row because (CC)it should be in col3
  3,E,FF,Y,L
  4,G,,,XX,P,B -- reject this row because(XX) it should be in col3
  5,P,Kk,,,D,M -- this is correct record since kk 2 letter digit is in col3
  6,G,MM,,,,-- correct record since record MM is in col3 
  </code></pre>
  
  <p>How do I validate this csv file? </p>
  
  <p>so that I get all <code>2</code> letter in <code>column 3</code> [col3]</p>
  
  <p>I am following these steps source file to be copied into another file(since I don't operate in source file) then </p>
  
  <p>I am not getting how to put the rejected rows into another file ,please can somebody help me on this!</p>
  
  <pre><code>Sub test()
  
      '///OPEN FILE and READ
      Set objFileToRead = CreateObject("Scripting.FileSystemObject").OpenTextFile("C:\coe.txt", 1)
      'Set objFileToWrite = CreateObject("Scripting.FileSystemObject").OpenTextFile("C:\copyme2.txt", 2)
      strFileText = objFileToRead.ReadAll()
      objFileToRead.Close
  
  
      ' ///PASTE
      Set objFSO = CreateObject("Scripting.FileSystemObject")
      Set objFileToWrite = objFSO.OpenTextFile("c:\cou.txt", 2)
      objFileToWrite.Write strFileText
      objFileToWrite.Close
  
  End Sub
  </code></pre>