Discussion :

[comme de bien entendu]

Bonjour,
La méthode Open ADODB que j'utilise dans mon classeur Xlsm génère l'erreur

Pilote Isam Introuvable.

Je ne vois pas la source d'erreur dans le code ci dessous :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Set cnn = New ADODB.connection
    cnn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;DataSource=" & ActiveWorkbook.Path & "\" & ActiveWorkbook.Name & _
       ";Extended Properties=""Excel 12.0;HDR=YES;"""
        cnn.Open

J'ai testé mes chemins de Workbook il semble bon.
J'ai testé avec le Driver pur Excel .xls et ca a marché. (marche pas sur tous les postes)

A tout hasard y aurait il une erreur dans l'ordre de mes references ?
ordre suivant :
VBA/
Microsoft Excel 14.0 object Librairy/
Ole Automation/
Microsoft Jet and Replic Data Object 2.6/
Microsoft ActiveX Data Object Recodset 6.0/
Microsoft DAO 3.6/
Microsoft ActiveX Data Object 2.8 library.

Merci d'avance de vos idées, car je mouline dans le vide.

[Duddy]

Bonjour,

J'utilise ce code qui me donne satisfaction:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
        Set Cn = New ADODB.Connection
        '--- Connection ---
        With Cn
        .Provider = "Microsoft.Jet.OLEDB.4.0"
        .ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" _
        & Fichier & ";Extended Properties=""Excel 8.0;HDR=NO;"""
        .Open
        End With '-----------------

Vois si cela te convient.

[comme de bien entendu]

Merci bien, ca a marché, reste à vérifier que ca marche aussi sur la machine du bureau.
Bon week-end.