none
Inconsistencia de Datos al leer Archivo Excel RRS feed

  • Pregunta

  • Buenas noches

    Actualmente uso Visual Studio 2013 y estoy programando en Visual Basic .NET; el siguiente es el código que uso para cargar un archivo de Excel en un DataGridView:

    Dim ds As New DataSet Dim da As OleDbDataAdapter, data Dim dt As DataTable Dim conn As OleDbConnection conn = New OleDbConnection( _ "Provider=Microsoft.ACE.OLEDB.12.0;" & _ "data source=c:\archivo.xlsx; " & _ "Extended Properties='Excel 12.0 Xml;HDR=Yes'") Try da = New OleDbDataAdapter("SELECT * FROM [Hoja1$]", conn) conn.Open() da.Fill(ds, "MyData") dt = ds.Tables("MyData") DataGridView1.DataSource = ds DataGridView1.DataMember = "MyData" Catch ex As Exception MsgBox "Se ha producido el error: " & ex.Message Finally conn.Close() End Try

    VIAS DE ACCESO HOGARES INFANTILES ESCUELAS
    1,2,3,4 1 1
    3 2 3
    3 2 3

    El código funciona sin inconvenientes, sin embargo al revisar los datos de las columnas importadas o cargadas no me trae la información completa y en la columna de ejemplo que describo arriba VIAS DE ACCESO en la celda 1,2,3,4 me lo muestra nulo o en blanco; sólo toma los datos de tipo numérico.  Eso mismo pasa con las otras columnas que contienen este tipo de información en diferentes filas.

    Muchas gracias por su valiosa colaboración

    miércoles, 30 de septiembre de 2015 23:51

Respuestas

  • Encontré la solución en el siguiente link

    http://www.mvp-access.es/softjaen/articulos/excel/ado_dao_excel.htm#Index3

    En el cual dice que debemos adicionar los parámetros  MaxScanRows e IMEX, quedando el string de conexión así:

    conn = New OleDbConnection( _ "Provider=Microsoft.ACE.OLEDB.12.0;" & _ "data source=c:\archivo.xlsx; " & _ "Extended Properties='Excel 12.0 Xml;HDR=Yes'; MaxScanRows=0; IMEX=1")

    miércoles, 30 de septiembre de 2015 23:59