title: Fastest ADO to copy paste tables from sql-server to Excel
body: <p>I'm moving tables of data from sql-server into Excel.<br>
  I do not need to move through the record set only to grab the data and paste it into a worksheet.</p>
  
  <p>Am I using the correct arguments for the recordset's <code>Open</code> method? </p>
  
  <pre><code>Dim recSet As ADODB.Recordset
  Set recSet = New ADODB.Recordset
  aConnection.Open
  recSet.Open stringSQL, aConnection, adOpenForwardOnly, adLockReadOnly, adCmdText 
  wb.Sheets(sName).Cells(1, 1).CopyFromRecordset recSet
  recSet.Close
  If Not (recSet Is Nothing) Then
      If (recSet.State And 1) = 1 Then recSet.Close
      Set recSet.ActiveConnection = Nothing
      Set recSet = Nothing
  End If
  </code></pre>