title: Automation Error with Range.Recordset method
body: <p>I'm running into an issue when executing this line of code, that is contained in a userform:</p>
  
  <pre><code> Dim RS As ADODB.Recordset
   Set RS = CreateObject("ADODB.RecordSet")
  
   'omitting the queryString and connection parameters - I'm highly certain 
    the issue doesn't lie there
  
   RS.Open queryString, cn
  
   'Declare the object
   Dim classCutCells As Range
  
   'The next 2 lines are 1 in the actual code, just broke it up here for readability
   Set classCutCells = reisWS.Range(reisWS.cells(classCutRow, classCutCol),  _
       _ reisWS.cells(classCutRow + RS.RecordCount, classCutRow + RS.Fields.Count))
  
   'The following line produces the error
   classCutCells.CopyFromRecordset (RS)
  </code></pre>
  
  <p>When the click event goes off, I get this error:</p>
  
  <pre><code>Run-time error '430': Class does not support Automation or does not support expected interface.
  </code></pre>
  
  <p>My current references include:</p>
  
  <pre><code>Visual Basic for Applications
  Microsoft Excel 14.0 Object Library
  OLE Automation
  Microsoft Forms 2.0 Object Library
  Microsoft Office 14.0 Object Library
  Microsoft Scripting Runtime
  Microsoft Windows Common Controls 6.0 (SP6)
  Microsoft Visual Basic for Applications Exentisibility 5.3
  Microsoft ActiveX Data Objects 6.0 Library
  </code></pre>
  
  <p>When I step in to debug, and pass classCutCells.CopyFromRecordset (RS) into the immediate window, the code works without a hitch, and the data is dropped into desired range.  I'm thinking this could be a reference issue, but have not found anything online after a few days of looking.  Any ideas?</p>