J'ai été la conception d'une base de données avec beaucoup de formes. Pour le rendre plus convivial, j'ai dû ajouter de nombreux boutons sur ces formulaires afin que les utilisateurs peuvent accéder facilement à d'autres formes dont ils avaient besoin. En utilisant le bouton d'accès Assistant a été l'ajout d'une grande quantité de code à ma base de données. Il a été plus vite que la dette nationale. Heureusement, j'ai découvert une solution simple pour éviter d'ajouter tout ce code et le ballonnement base de données qui va avec.
Au lieu d'ajouter le code à vos formulaires pour ouvrir d'autres formes, vous pouvez utiliser cette fonction simple pour ouvrir vos formulaires. Vous pouvez ajouter cette fonction à un module existant ou en créer un nouveau module (pas un formulaire, un état ou un module de classe, mais un module régulière dans le groupe Modules).
Vous pouvez commencer par copier le code suivant à un module:
Public Function Openmyfrm (myfrmname As String)
myfrmname DoCmd.OpenForm
End Function
C'était facile n'est-ce pas? Mais le meilleur est encore à venir. Comment obtenez-vous cette fonction pour ouvrir votre formulaire? Avec une seule petite ligne dans le cas de Au clic sur un bouton
Openmyfrm = ("YOURFORMNAME")
Ça y est! La fonction accepte le nom du formulaire entre guillemets comme une chaîne parce que nous lui avons dit de le faire que lorsque nous avons ajouté (myfrmname As String) à la fonction. Il utilise ensuite ce nom forme comme une variable avec le code DoCmd.OpenForm.
Vous devez ajouter le Openmyfrm = ("YOURFORMNAME") à l'expression sur l'événement Click d'un bouton. (Je suis en utilisant tous les bouchons pour indiquer où vous devez ajouter le nom de votre formulaire).
Au cas où vous avez besoin d'aide, voici comment ajouter l'expression à un bouton: Ouvrez votre formulaire en mode design. Cliquez sur le bouton de la barre d'outils et le lieu d'un nouveau bouton sur votre formulaire. L'Assistant Bouton allume. Je viens de cliquer sur Annuler, et j'ai un nouveau bouton prêt à l'emploi. -Je changer la légende sur le bouton pour quelque chose comme Open clients formulaire.
Ensuite, ouvrez la feuille de propriétés du bouton. Vous pouvez le faire par un clic droit sur le bouton et sélectionner "Propriétés". Ensuite, cliquez sur «l'événement» onglet. Trouvez la zone blanche à côté de l'événement Sur clic. Ajouter l'expression avec le nom du formulaire que vous souhaitez ouvrir entre les guillemets.
Vous avez terminé! (Ne pas oublier d'ajouter une erreur de manipulation à votre fonction).