Textbox de Excel con VB
Publicado por Barca10 (132 intervenciones) el 29/06/2007 09:12:03
Tengo un problema y espero que me puedan ayudar, tengo un formulario de visualbasic en el cual se realiza una busquedad para mostrar luego el resultados en una hoja de Excel, el problema esta en que la informacion la debo mostrar en un textbox que esta creado en la plantilla de Excel y cuando se abre el archivo el texto no se ve, pero cuando hago un click en el textbox aparece el texto
No se si el codigo que utilizo para pasar la informacion desde el recordset a la hoja de excel, es la correcta.
Private Sub Command1_Click()
pRutaPlantilla = App.Path & "\mapa.xlt"
Set xlsLibro = GetObject(pRutaPlantilla)
xlsLibro.Application.DisplayAlerts = False
xlsLibro.Windows(1).Visible = False
xlsLibro.Sheets.Item(1).Label1.Caption = "Prueba"
end sub
No se si el codigo que utilizo para pasar la informacion desde el recordset a la hoja de excel, es la correcta.
Private Sub Command1_Click()
pRutaPlantilla = App.Path & "\mapa.xlt"
Set xlsLibro = GetObject(pRutaPlantilla)
xlsLibro.Application.DisplayAlerts = False
xlsLibro.Windows(1).Visible = False
xlsLibro.Sheets.Item(1).Label1.Caption = "Prueba"
end sub
Valora esta pregunta


0