Discussion :

[morgane12]

Bonjour,

Je débute tout juste dans la programmation et le code de cette discussion m'a servi de modèle pour exporter une requête acces vers excel.
j'ai recopié mot pour mot ce code en changeant uniquement les noms de mes champs puisque le résultat voulu était identique.

Cependant,
lorsque je lance la macro, rien ne se passe:
la ligne

Code :

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

Sub ConnectDB(ByRef cnx As ADODB.Connection, ByVal strPath As String)

est surlignée

et un message d'erreur s'affiche:
Erreur de complication
Type défini par l'utilisateur non défini

j'ai peut-être fait une erreur sur le classeur excel, mais je n'ai trouvé nulle part d'explication sur ce qu'il faut faire sur le classeur excel (pas forcément trivial qd on ne maitrise pas excel) en plus des lignes de code


je me dit qu'il s'agit juste d'un mauvaise manip et que le code est bon puisqu'il a marché pour
Margoulin79

désolée pour le manque d'illustration dans ce message mais je ne sais pas non plus insérer d'images par contre je joins mon fichier excel


Merci de votre précieuse aide!

[SilkyRoad]

bonjour


Tu dois activer la référence Microsoft ActiveX Data Object 2.x Library

dans l'éditeur de macros (Alt+F11)
menu Outils
References
coche la ligne "Microsoft ActiveX Data Object 2.x Library"
clique sur le bouton OK pour valider


bonne journée
michel

[morgane12]

Merci,

J'ai coché
"Microsoft ActiveX Data Object 2.0 Library"

Pourtant, il ne se passe toujours rien, lorsque que je lance la macro, ca bloque,
maintenant c'est "Sub auto_open()" à la première ligne qui est surligné (en jaune fluo)
mais ausssi "cnx" (celui sous le commentaire "connexion à la base") (en bleu marine)
et un message s'affiche: "erreur de compilation: type d'argument Byref incompatible"

me voilà à nouveau bloquée!

Merci de votre aide!

[SilkyRoad]

rebonsoir

j'aurais du ouvrir ton classeur avant d'envoyer mon premier message ... ;o)

Code :

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

1
2
3
4
5
6
7
8
Sub test()
'
' test Macro
' Macro enregistrée le 08/07/2008 par hantj
'

Public cnx As ADODB.Connection
  Sub auto_open() 

cette syntaxe ne peut pas fonctionner.
il n'est pas possible d'inbriquer deux procedures sub :
http://bidou.developpez.com/article/VBA/
http://silkyroad.developpez.com/VBA/DebuterMacros/

Public cnx As ADODB.Connection

Les variables publiques doivent etre déclarées en tete de module avant la premier procedure Sub:
http://silkyroad.developpez.com/VBA/LesVariables/
http://mhubiche.developpez.com/Access/variables/


de plus, privilégie l'evenement Workbook_Open à la place de auto_open
http://silkyroad.developpez.com/VBA/EvenementsClasseur/


bonne soirée
michel

[morgane12]

whaouhh!

ca fait bcp de lecture tout ça. Je vais potasser et essayer de résoudre le hic dans la semaine.

Merci beaucoup!!!