SoloCodigo
Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: Ce5aR en Miércoles 5 de Noviembre de 2003, 07:58
-
Hola estoy desarrollando un proyecto donde recibo datos de un microcontrolador por el puerto serie, trabajo con los datos y en base a ellos creo una tabla bastante grande y lo hago en un MSHFLEXGRID, ahora quisiera poder pasar esta tabla a EXCEL, no sé si alguien me pueda ayudar, ya que según yo en primer lugar se tiene que crear el documento de Excel, y después indicarle la fila y columna. Espero me puedan ayudar.
Saludos desde México
:ayuda:
-
Estas en lo cierto, debes crear un documento excel y despues recorrer la flex e ir insertando los valores en la fila y columna del fichero excel, algo asin;
****************************
Public gAppExcel As New Excel.Application
Public Libro As New Excel.Workbook
Public Hoja1 As New Excel.Worksheet
'Abrir
Set Libro = gAppExcel.Workbooks.Open(FileName:=fFicherosalida)
Set Hoja1 = Libro.Worksheets(1)
'Das valor
Hoja1.Cells(Fila,Columna).Value= _
mshFlex.Texmatrix(Fila,Columna)
'Salvas
Libro.Save
'Cierras todo*OJITO NO SE QUEDE NADA SIN VACIAR*
Set Hoja1 = Nothing
Set Libro = Nothing
gAppExcel.Quit
Set gAppExcel = Nothing
Espero que sirva de orientacion...