Visual Basic - Excel y Visual

Life is soft - evento anual de software empresarial
 
Vista:

Excel y Visual

Publicado por Bhagavan (6 intervenciones) el 08/08/2004 22:26:46
tengo un pequeña duda =P,pues quisiera saber como importar de excel a visual osea llenar unos campos en excel y desde mi aplicacion en visual importar esa tabla y que automaticamente se llenen los campos de texto con dicha informacion.

Gracias

PD: si alguien ya pegunto esto diganme :P esque e buscado pero no encuentro.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Excel y Visual

Publicado por Skrank (99 intervenciones) el 09/08/2004 00:12:24
Hola que tal.
Hay que cargar la referencia Microsoft Excel 9.0 Object Library
'Declaramos la variable tipo Object
Dim objexcel As Object
'abrimos un fichero Excel
objexcel.Workbooks.Add ("Path\NombreArchivo.xls")
'escribimos algunos datos en las celdas
With objexcel.Application.ActiveSheet
.Cells(1, 1).Value = "Título" 'por ejemplo
.Cells(2, 1).Value = "Columna 2"
.Cells(2, 2).Value = "Columna 3"
.Cells(2, 3).Value = "Columna 4"
.Cells(2, 4).Value = "Columna 5"
.Cells(3, 1) = "Texto"
.Cells(3, 2) = "OtroTexto"
.Cells(3, 3) = "UnTextoMas"
.Cells(3, 4) = "TheLastText"
End With
'para leer los datos es similar
With objexcel.Application.ActiveSheet
Label1(0).Caption = .Cells(1, 1)
For I = 0 To 1
Label1(I + 1).Caption = .Cells(I + 2, 1)
Label2(I).Caption = .Cells(I + 2, 2)
Label3(I).Caption = .Cells(I + 2, 3)
Label4(I).Caption = .Cells(I + 2, 4)
Next
End With
En el formulario, como se puede ver, debe de haber cuatro matrices de Labels
Espero que funcione y te sirva
Un saludo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Excel y Visual

Publicado por Bhagavan (6 intervenciones) el 09/08/2004 06:09:34
gracias por contestar ami poregunta,pero al hacer eso que me dijiste me sale un error en tiempo de ejecucion 9,=p nose que estare haciendo mal gracias =).
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Excel y Visual

Publicado por Skrank (99 intervenciones) el 09/08/2004 12:37:29
Hola otra vez.
He estado comprobando y para resolver el error hay que añadir el siguiente código en el Form_Load o al principio del Command1_Click
Set objExcel = CreateObject("Excel.Application")
También me he dado cuenta que los datos de las celdas aparecen en el formulario un poco revueltos, pero ordenarlos creo que te será muy sencillo.
El error que me da es el 91.
Un saludo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar