Bonjour,
Suite à un message dernièrement sur le sujet cité ci-dessus, j'ai obtenu par francishop le lien suivant :
http://access.developpez.com/faq/?pa...ss#OuvrBddForm
Super, par contre je rencontre une difficulté avec une erreur d'éxécution qui s'affiche.... ( 424 ) objet requis.
J'ai installé dans les différents fichiers ACCESS dans un module le code suivant :
Ensuite j'ai rentré dans le portail sous VBA le référencement, que je retrouve dés que j'ouvre ce portail en mode code vba.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Public Function FormOpen(FormName As String, _ Optional View As AcFormView = acNormal, _ Optional FilterName As String, _ Optional WhereCondition As String, _ Optional DataMode As AcFormOpenDataMode = acFormPropertySettings, _ Optional WindowMode As AcWindowMode = acWindowNormal, _ Optional OpenArgs As String) DoCmd.OpenForm FormName, View, FilterName, _ WhereCondition, DataMode, WindowMode, OpenArgs End Function
Avec un bouton j'ai mit le code suivant :
Et rien ne ce passe, si n'est l'erreur !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2Application1_E1_frm.FormOpen "ici le nom du formulaire.mdb", acDesign
Que faire, ou me suis-je trompé ?
Merci pour votre aide .
Bien cordialement
Partager