Visual Basic - importar datos de exel a una grilla por favor

Life is soft - evento anual de software empresarial
   
Vista:

importar datos de exel a una grilla por favor

Publicado por MIGUEL MATURANA (51 intervenciones) el 16/08/2009 10:23:40
al inportar estos datos el libro lo encuentrapero la hoja con los datos no esta marcado con ****
ayuda
Os pongo un ejemplo: Poned en el form un CommandButton (Command1) y un control DataGrid (DataGrid1). Teneis que tener marcada la referencia a ADO.

Private Sub Command1_Click()
Dim con As ADODB.Connection
Dim rst As ADODB.Recordset
' abrimos la conexión al Libro Excel
Set con = New ADODB.Connection
With con
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "Data Source= " & App.Path & "/Libro1.xls;" & _
"Extended Properties=Excel 8.0;"
.CursorLocation = adUseClient
.Open
End With
' creamos un recordset con los datos de "Hoja1"
Set rst = New ADODB.Recordset
rst.Open "SELECT * FROM [Hoja1$] ", con, adOpenDynamic, adLockOptimistic ******
' asignamos los campos al DataGrid
Set DataGrid1.DataSource = rst
End Sub
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:importar datos de exel a una grilla por favor

Publicado por Alexandrel (15 intervenciones) el 17/08/2009 22:33:31
es mucho mas complicado usar el ADO con excel que usar el componente que viene en el VB, dandole click derecho a tu barra de herramientas, components, microsoft office components, elijes la herramienta de excel y la enlazas con tu documento, y este te respeta los formatos que tu manejas en esta hoja de excel, mucha suerte y si tienes dudas no dudes en esccribirme
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