Bonjour,
je veux me connecter à ma base SQL à partir de Excel. Quand j'arrive à l'instruction Open, j'ai le message d'erreur :
Nom du fichier ou de la classe introuvable lors de l'opération Automation. Erreur d'exécution 432
Mon 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
25
26
27
28
29
30
31
32
33
34
Dim Cnx_DB As New ADODB.Connection         
Dim Rst_DB As New ADODB.Recordset     
Dim s_SQL As String                         
Dim s_FichierINI As String                  

Sub Workbook_Open()

    s_FichierINI = ActiveWorkbook.Path & "\Courbes_Pas.ini"
    
    '---- Connexion à la base de donnée en utilisant le fichier UDL dont le nom est défini dans le fichier INI
    Cnx_DB.ConnectionString = "FILE NAME=" + LireINI(s_FichierINI, "Config", "FichierUDL")
    Cnx_DB.Open
etc....

End Sub
J'utilise un fichier UDL afin de pouvoir changer la source de données sans toucher à l'appli Excel. Lorsque je lance mon fichier UDL à la main, celui-ci se connecte correctement.
Pour info mon fichier Ini :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
12
[Config]
FichierUDL=Courbes_Pas.udl
et mon fichier UDL :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
123
[oledb]
; Everything after this line is an OLE DB initstring
Provider=SQLOLEDB.1;Password=bic;Persist Security Info=True;User ID=User_Lames;Initial Catalog=Lames-Test;Data Source=VERSSQL01
J'ai bien mis la référence Microsoft ActiveX Data Objects 2.8 Library
et mes données sont sur un serveur SQL Server 2005