Problème connexion Excel - access

Bonjoru j'essaye de me connecter à ma base de données access via mon fichier Excel

Voici le code :

Private Sub Commande1_Click()

Dim source As ADODB.Connection

Dim t_list As ADODB.Recordset

Dim chemin As String, texte_SQL As String

''''' Création des variable pour la création de la requête

''''' Chaine de caractères

Dim Departement, Objet, NomImage, ActiviteExeLign1, ActiviteExeLigne2, ActiviteExeLigne3 _

, Nom, Marque, Priorite, Observation, Preconisation, ActionSoldee, Status, Metier, Reference, TypeTravail _

, Statut As String

''' Entier

Dim Nombre, Num_Obs, Annee, Nb_personne _

, TempsEstime, Plannificateur, Acceptation, OT As Integer

''' Date

Dim DateDebut, DateFin As Date

' Ouverture de la base de données Access

Set source = New ADODB.Connection

source.Provider = "Microsoft.Jet.OLEDB.4.0;"

chemin = "C:\Users\jma2755\Desktop\2 - Fichier Apave" ' Pour avoir le même chemin que le fichier : ActiveWorkbook.Path

source.Open chemin & "\BaseApave.mdb" /////////// PROBLEME ICI

Set t_list = New ADODB.Recordset

Mais il me met un message d'erreur :

Format de base de données non reconnu.

Je précise que le chemin est bon mais je ne sais pas d'ou est le problème.

Quelqu'un peut m'aider s'il vous plait.

Merci beaucoup.

Cordialement.

Bonjour Nemesiss

Question peut-être bête, mais quel est le format (version) de ta base de donnée ?

A+

Rechercher des sujets similaires à "probleme connexion access"