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

quentin22breizh 35 Messages postés mercredi 30 juillet 2014Date d'inscription 27 avril 2017 Dernière intervention - 14 avril 2016 à 11:00 - Dernière réponse : quentin22breizh 35 Messages postés mercredi 30 juillet 2014Date d'inscription 27 avril 2017 Dernière intervention
- 15 avril 2016 à 09:55
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
Afficher la suite 

Votre réponse

2 réponses

cs_JMO 1855 Messages postés jeudi 23 mai 2002Date d'inscription 24 juin 2018 Dernière intervention - 14 avril 2016 à 13:01
0
Merci
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
Commenter la réponse de cs_JMO
quentin22breizh 35 Messages postés mercredi 30 juillet 2014Date d'inscription 27 avril 2017 Dernière intervention - 15 avril 2016 à 09:55
0
Merci
Parfait merci cs_JMO. ça fonctionne comme je voulais.

je clos le sujet
Commenter la réponse de quentin22breizh

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.