1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
  4. VB.NET
Sujet Précédent Sujet Suivant

Récupérer les données d'un fichier XLS dans un tableau [Résolu]

Signaler
Messages postés
35
Date d'inscription
mercredi 30 juillet 2014
Statut
Membre
Dernière intervention
27 avril 2017
 -
Messages postés
35
Date d'inscription
mercredi 30 juillet 2014
Statut
Membre
Dernière intervention
27 avril 2017
 -
Bonjour à tous,

Je me permets de venir vers vous pour un petit souci. Je souhaiterai récupérer les données de mon fichier excel et les mettre dans un tableau.

Je souhaiterai éviter de passer par les Excel.Interop pour permettre l'utilisation du soft sans avoir excel d'installer sur le poste.

J'ai essayer avec OLEDB mais il me supprime la première ligne.

Merci d'avance pour votre aide

2 réponses

Réponse 1 / 2
Messages postés
1854
Date d'inscription
jeudi 23 mai 2002
Statut
Membre
Dernière intervention
24 juin 2018
 26
Bonjour,

Dans la chaine de connexion OleDbConnection, il suffit de préciser HDR=NO

Exemple: 
Dim cnCGN As OleDbConnection = New OleDbConnection(ConnectionExcel(filecgn))
    Public Function ConnectionExcel(ByVal FullPathExcelFile As String) As String
        Dim connectingdatabaseexcel As String
        connectingdatabaseexcel = "Provider=Microsoft.ACE.OLEDB.12.0;" & "Data Source=" & FullPathExcelFile &
                                  ";Extended Properties=""Excel 12.0;HDR=NO;" & "Persist Security Info=False" & """"
        ConnectionExcel = connectingdatabaseexcel
    End Function
Réponse 2 / 2
Messages postés
35
Date d'inscription
mercredi 30 juillet 2014
Statut
Membre
Dernière intervention
27 avril 2017
Parfait merci cs_JMO. ça fonctionne comme je voulais.

je clos le sujet
Répondre Posez votre question