MSFlexGrid

[javierjava]

Que tal necesito de su ayuda necesito pasar todos los datos de una Columna de  un MSFlexGrid a una hoja de Excel y lo estoy haciendo de este modo pero me da error.


Worksheets(1).Range("C48").Activate
grid.Rows = grid.Rows+1
For i = 1 To grid.Rows
ActiveCell.Value = grid.TextMatrix(i, 0)
Next

alguien sabe porque o alguien tiene otra forma de hacerlo.

Espero que me puedan ayudar

Gracias 

[APOKLIPTICO]

Que error te tira?

[ssccaann43 ©]

Revisa este link amigo..

http://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/240-exportar-flexgrid-a-excel.htm


Y este otro hace lo contrario, importa desde excel al flexgrid

http://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/128-importar-excel-flexgrid.htm

[javierjava]

Muchas gracias me fue muy util los ejemplos

Pero tengo otra pequeña duda cuando paso el contenido de un textbox multiline a una celda de excel lo pasa con un cuadrito como puedo hacer para que ya salga el cuadro

este es el codigo que estoy usando

Worksheets(1).Range("J6").Activate
ActiveCell.Value = Text3.Text


Gracias y disculpen las molestias

[ssccaann43 ©]

No entendi lo del cuadrito... Especificate...

[javierjava]

mira  pasa el contenido del textbox multiline con un cuadro al final
ejeplo

Contenido del textbox [] 


el cuadro no esta en el textbox si no que lo genera cuando lo paso a excel
como puedo hacer para que ya salga el cuadro o el caracter de mas

[ssccaann43 ©]

La verdad es que no se porque te aparece ese cuadro allí. Postea el codigo que usas para verlo. 

[seba123neo]

debe ser por algun caracter no reconocido o algo por el estilo...