Discussion :

[broux]

Bonjour,

je n'ai pas Excel 2007 sur mon poste et je souhaite me connecter à un fichier Excel 2007 (.xlsx), j'ai trouvé ce bout de code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
Sub RequeteClasseurFerme_Excel2007()
     Dim Cn As ADODB.Connection
    Dim Fichier As String
 
    'Définit le classeur fermé servant de base de données
    Fichier = "C:\test.xlsx"
 
    Set Cn = New ADODB.Connection
 
    '--- Connexion ---
    With Cn
        .Provider = "Microsoft.Jet.OLEDB.4.0"
        .ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" _
            & Fichier & ";Extended Properties=""Excel 12.0;HDR=YES;"""
        .Open
    End With
    '-----------------
 
    '--- Fermeture connexion ---
    Cn.Close
    Set Cn = Nothing
 
End Sub

Malheureusement pour moi, lors de l'appel à la fonction Open, j'ai un message d'erreur : "Impossible de trouver le fournisseur. Il est peut être mal installé."

Pourtant j'ai la dernière version de ADO d'installée, 2.8.

Merci d'avance pour votre aide.

[broux]

C bon ne cherchez plus, j'ai trouvé.

Il suffit d'installer, les drivers ODBC pour les fichiers xlsx.
Le plus dur a été de trouver le programme d'installation de ces drivers.

Il s'agit du fichier "AccessDatabaseEngine.exe" disponible en téléchargement sur le site de microsoft.
http://www.microsoft.com/downloads/d...DisplayLang=en

Merci à ceux qui ont prit la peine de chercher.

BR++