J'ai récupéré l'exemple de Dude (ouvreform31.odb) donné dans la section Techniques pour débuter avec le module Base, et il y a un problème avec la macro OpenForm.
La procédure lancée par le clic sur les boutons produit l'erreur suivante :
Il suffit de remplacer
- Code : Tout sélectionner AgrandirRéduire
aProp(1).Value = strMode
- Code : Tout sélectionner AgrandirRéduire
aProp(1).Value = openMode
De plus, autre souci, que j'ai la flemme d'essayer de résoudre, le bouton "Quitter" de chaque formulaire, fait appel à une macro ExitForm qui n'existe pas...
Ajout : Finalement, j'ai pris le temps de le faire |
Rajouté Module1 dans la librairie standard du document, et créé la procédure :
- Code : Tout sélectionner AgrandirRéduire
Sub ExitForm
thiscomponent.currentcontroller.frame.close(true)
End Sub
Mais bien que les noms soient les mêmes, il a quand même fallu réaffecter cette procédure à tous les boutons "Quitter".
Ajout : En lisant plus loin, je vois que la macro OpenForm peut être avantageusement remplacée par ThisDatabaseDocument.FormDocuments.getByName( "NomFormulaire" ).open |
Il faut vraiment lire beaucoup pour arriver à ce résultat

Cordialement