Discussion :

[gunxi3]

Bonjour,
J'ai une macro ajoutant des données dans une bdd SQL Server. Je me sers donc de Microsoft ActiveX Data Objects 2.8 Library avec ADODB. De base sur les Excel de mon entreprise cette référence n'est pas activée. Je souhaite donc ouvrir la référence dans le code.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Sub chargeRef()
    ThisWorkbook.VBProject.References.AddFromFile "C:\Program Files\Common Files\System\ado\msado28.tlb"
End Sub
 
Sub insertSql()    
    ' Réf
    Call chargeRef
 
    ' Connexion
    Set connQuinc = New ADODB.Connection
End Sub

Lorsque la référence n'est pas coché j'ai l'erreur "Type défini par l'utilisateur non défini" sur ADODB.Connection. Je n'ai pas d'erreur lorsque c'est coché.

[joe.levrai]

Bonjour,

quand un projet est distribué pour plusieurs PC, il est préférable de travailler en liaison tardive, ce qui évite d'utiliser les références et de gérer les problèmes sous-jacents

remplace ton utilisation typée :

Code :

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

Set connQuinc = New ADODB.Connection

par une déclaration d'objet "lambda" et une création de l'objet souhaité

Code :

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

1
2
Dim connQuinc as Object
Set connQuinc = CreateObject("ADODB.Connection")

à faire pour chaque objet de la librairie utilisée (on n'a pas l'ensemble de ton code)


Un petit tour par ici où était proposé la liaison tardive sur un peu plus d'objets : http://www.developpez.net/forums/d16...e/#post8897732