Visual Basic - Exportar RecordSet a Archivo Plano

Deseo enviar el contenido de un RecordSet a un Archivo Plano, o a un archivo de Excel.
Muy agradecido.

Hola, lo primero es decrite que tienes que trabajar con la referencia ADO 2.1.

Prueba esto:

Option Explicit

Private Sub Command1_click()
Dim cn As New ADODB.connection
Dim cm As New ADODB.Command
Dim sql As String

cn.ConnectionString = \"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\\newjuan23.mdb;Persist Security Info=False;\"
cn.open
sql = \"SELECT * INTO [Excel 8.0;Database=\" & App.Path & \"\\Exportacion.xls].[Datos] FROM Datos\"
cm.ActiveConnection = cn
cm.CommandText = sql
cm.Execute

Set cm = Nothing
cn.Close
Set cn = Nothing
MsgBox \"Exportación finalizada\"
End Sub

Espero que te sea útil:

Juanito