• Lunes 23 de Diciembre de 2024, 00:55

Autor Tema:  Re: MSHFLEXGRID Y EXCEL  (Leído 1203 veces)

Ce5aR

  • Nuevo Miembro
  • *
  • Mensajes: 19
    • Ver Perfil
Re: MSHFLEXGRID Y EXCEL
« en: Miércoles 5 de Noviembre de 2003, 07:58 »
0
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:

javirues

  • Miembro activo
  • **
  • Mensajes: 46
    • Ver Perfil
MSHFLEXGRID Y EXCEL
« Respuesta #1 en: Miércoles 5 de Noviembre de 2003, 11:12 »
0
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...