title: CopyFromRecordset copies & pastes in same sheet only first one row paste even though multiple records are present in Excel
body: <p>I have an Excel sheet containing table like data</p>
  
  <pre><code>Sub SQLQUERY()
  
  Dim QUERY As String
  
  Dim ExcelCn As New ADODB.Connection
  Dim RS As New ADODB.Recordset
  SourcePath = "C:\Users\negi_tech\Desktop\sqltable.xlsx"
  
  
  
  
  
  ExcelCn.Open "Provider=Microsoft.ACE.OLEDB.12.0;" &amp; _
                 "Data Source=" &amp; SourcePath &amp; ";" &amp; _
                 "Extended Properties=""Excel 12.0;HDR=YES;"""
  QUERY = "select * from [Sheet2$] WHERE [Type]='RV'"
  RS.CursorType = ADODB.CursorTypeEnum.adOpenKeyset
  RS.Open QUERY, ExcelCn
  RS.MoveLast
  RS.MoveFirst
  Range("A2:BT50000").ClearContents
  Sheet2.Range("a2").CopyFromRecordset RS    
  </code></pre>
  
  <p>I am copying data from same sheet and then i am clearing all contents except headers and then pasting recordset in same sheet but it pasting only first row.
  but when i am pasting same recordset into other sheet then it pasting all records</p>
  
  <p>Please let me know why other records not copied into recordset?</p>