Tengo una funcion que funciona bien pero no del todo, a ver, cuando importo los datos de una hoja excel a un datagridview solo me "lee" o "reconoce" cuando la celda tiene determinado formato (por ejemplo formato texto), pero hay celdas que tienen otros formatos que no me las lee, es decir, hay celdas que cuando las importo a mi dgv quedan en blanco
Tal vez alquien dé con el error o tenga una funcion mas completa que lea todos los formatos de las celdas.
Mi funcion es la siguiente:
Código:
Function ImpExcel(ByVal ruta As String, ByVal dgv As DataGridView)
'funcion que muestra todos los campos de la hoja 1 de un excel en un datagridview
Dim miconexion As New OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0; data source=" & ruta & "; Extended Properties=Excel 8.0;")
Dim comando As New OleDbDataAdapter("select * from [cotizaciones al público$]", miconexion)
comando.TableMappings.Add("Table", "Attendence")
Dim DtSet As New DataSet
comando.Fill(DtSet)
dgv.DataSource = DtSet.Tables(0)
Return Nothing
End Function
Bueno, espero que alguen me pueda dar una mano.'funcion que muestra todos los campos de la hoja 1 de un excel en un datagridview
Dim miconexion As New OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0; data source=" & ruta & "; Extended Properties=Excel 8.0;")
Dim comando As New OleDbDataAdapter("select * from [cotizaciones al público$]", miconexion)
comando.TableMappings.Add("Table", "Attendence")
Dim DtSet As New DataSet
comando.Fill(DtSet)
dgv.DataSource = DtSet.Tables(0)
Return Nothing
End Function
Gracias.
Saludos.