Exportar de un MSFlexGrid a Excel ¿se puede?

Ricardo
14 de Abril del 2004
Hola a todos, espero que me puedan ayudar porque ando un poco perdido. Pues resulta que tengo unos datos en un MSFlexGrid y quiero exportarlo a excel. ¿Se puede? y si es así me pueden orientar para poder hacerlo, se los agradecería inmensamente. Saludos.

tencho
14 de Abril del 2004
Mira con este ej puedes copiar el contenido de la grilla al portapapeles y despues pegar en excel

Sub CopiarGrilla(Grilla As MSHFlexGrid)
Texto = ""
For i = 0 To Grilla.Rows - 1
For j = 0 To Grilla.Cols - 1
Texto = Texto & Grilla.TextMatrix(i, j)
If j < Grilla.Cols - 1 Then Texto = Texto & vbTab
Next j
Texto = Texto & vbCrLf
Next i
Clipboard.Clear
Clipboard.SetText Texto
End Sub

Tienes ke llamar al procedimiento asi:
Call CopiarGrilla(NombreDeLaGrilla)

Fijate ke es un MSHFlexGrid no un MSFlexGrid, espero ke te sirva