Lorsque j'essaye de faire fonctionner cette macro:
J'ai le message d'erreur suivant "Type défini par l'utilisateur non Défini".
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 Sub ouvrirformulaire() Dim acApp2 As New Access.Application 'demarrer access Set acApp2 = New Access.Application 'ouvrir la base acApp2.OpenCurrentDatabase ("K:\CADRAN\Stocks.mdb") 'executer le formulaire dans d'access acApp2.DoCmd.OpenForm "Achats_Finalise_Form" baseAcces.Visible = True acApp2.Quit Set acApp2 = Nothing End Sub
Après quelques recherches j'ai trouvé qui fallait activer "Microsoft DAO 3.x Object library." Pour autant j'ai toujours le message d'erreur.
Des idées sur la source de mon problème ?
Jarault
Partager