Ver Mensaje Individual
  #2 (permalink)  
Antiguo 07/04/2008, 11:45
Avellaneda
Colaborador
 
Fecha de Ingreso: enero-2008
Ubicación: Unas veces aquí, otras veces allí
Mensajes: 1.482
Antigüedad: 17 años, 2 meses
Puntos: 37
Re: Crear Documento en Excel desde VB6.0

Si ya tienes abierta a conexión a la BD (suponemos que se llama "cn")

Código:
 Dim ExcelFile As String
    Dim HojaExcel As String
    ExcelFile = App.Path & "\Libro1.xls"
    HojaExcel = "[Hoja1]"
    cn.Execute "SELECT * INTO [Excel 8.0;DATABASE=" & ExcelFile & "]." & _
        HojaExcel & " FROM LaTablaSql"
Hay muchos métodos para exportar datos a Excel: Abrir un recordset y copiar campo a campo, usar el método CopyFromRecordset, etc. etc.. pero de todos los que he probado, éste es el más sencillo y más rápido.