Visual Basic - exportar datos a excel

Life is soft - evento anual de software empresarial
 
Vista:

exportar datos a excel

Publicado por jonathan (3 intervenciones) el 13/09/2002 00:46:03
necesito enviar solo algunos datos de una tabla detrminada a excel para generar un reporte.la planilla excel ya esta creada, me interesa ocupar la misma.
de ante mano 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:exportar datos a excel

Publicado por Harold Valdivia (104 intervenciones) el 13/09/2002 02:32:30
Espero que te ayude esto:

Este ejemplo tiene:

Un flexgrid con datos y al presionar el boton de comando abro el excel, le ponfgo titulos a la primera fila (algunas celdas) y luego le paso el contenido del FlexGrid.

Private Sub Command2_Click()
On Error GoTo control
With Flex_Muestra
Dim ApExcel As Variant, Color As Integer
Set ApExcel = CreateObject("Excel.application")
ApExcel.Visible = True
ApExcel.Workbooks.Add
ApExcel.Cells(1, 1).Formula = "Num"
ApExcel.Cells(1, 2).Formula = "Departamento"
ApExcel.Cells(1, 3).Formula = "Provincia"
ApExcel.Cells(1, 4).Formula = "Distrito"
ApExcel.Cells(1, 5).Formula = "CCP"
ApExcel.Cells(1, 6).Formula = "Zona Distrital"
ApExcel.Cells(1, 7).Formula = "NSE"
ApExcel.Cells(1, 8).Formula = "Manzana"
ApExcel.Cells(1, 9).Formula = "Viviendas"
ApExcel.Cells(1, 10).Formula = "Conglomerado"
ApExcel.Range("A1:J1").Borders.Color = RGB(255, 0, 0)
Dim Y As Integer
For Y = 1 To 10
ApExcel.Cells(1, Y).Font.Size = 12
ApExcel.Cells(1, Y).Font.Bold = True
Next Y
Dim z As Integer
ApExcel.Columns("H:H").Select
ApExcel.Selection.NumberFormat = "@"
Color = 1

For z = 2 To rs.RecordCount + 1
ApExcel.Cells(z, 1).Formula = .TextMatrix(z - 1, 0)
ApExcel.Cells(z, 2).Formula = .TextMatrix(z - 1, 1)
ApExcel.Cells(z, 3).Formula
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

RE:exportar datos a excel

Publicado por Andres Felipe Tabares (68 intervenciones) el 13/09/2002 15:36:35
Mira, en la siguiente direccion encontraras información de Visual Basic con excel, ahy puede estar la solución a tu duda.
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