Visual Basic - VISUAL BASIC Y EXCEL

Life is soft - evento anual de software empresarial
 
Vista:

VISUAL BASIC Y EXCEL

Publicado por Cesar (25 intervenciones) el 01/03/2004 01:50:15
Tengo que aprender a hacer consultas de una base de datos (cualquiera) desde visual basic y luego ingresarlos a una hoja electronica, no se si me podrian dar una ayudadita, de donde podria encontrar informacion, o si tendrian algunos ejemplitos que me pudiera proporcionar, Muchas Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:VISUAL BASIC Y EXCEL

Publicado por Ruben (129 intervenciones) el 01/03/2004 13:53:57
Esta funcion te puede ayudar

Podras encontra otra forma mas facil pero esta es muy practica y eficiente
tenes que referenciar "microsoft excel 9.x......"

pasar el recordset a un txt y luego con el nombre del txt (archivo) usa esta funcion

Private Sub ProcesarExcel(Archivo As String, Filas As Long)

Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlBooks As Excel.Workbooks
Dim xlWsheet As Excel.Worksheet
Dim xlChart As Excel.Chart
Dim xlSeries As Excel.Series

On Error Resume Next

Set xlApp = New Excel.Application
xlApp.Application.Visible = True

xlApp.Application.Workbooks.OpenText Archivo
Set xlBook = xlApp.Application.Workbooks.Item(1)
Set xlWsheet = xlBook.ActiveSheet
xlWsheet.Cells.Font.Name = "Courier New"
xlWsheet.Cells.Font.Size = 10
xlWsheet.Columns.EntireColumn.AutoFit
xlWsheet.SaveAs Archivo, xlExcel9795

End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar