Lorsque vous créez une macro sur Access, vous n’avez pas sa « version » en
langage VBA et si vous souhaitez incorporer cette macro à une autre action
via le même évènement, créer une boucle ou autre, cela peut être
problématique.
Dans ce tutoriel, je vais donc lister les principaux codes VBA que j’utilise
lorsque je crée des boutons et ne souhaite pas garder son action en tant que
macro. Ces codes sont bien sûr à utiliser dans une procédure (sur clic d’un
bouton par exemple).
Code VBA pour ajouter un
enregistrement :
[Link] , , acNewRec
Code VBA pour se placer sur le
premier enregistrement d’un
formulaire :
[Link] , , acFirst
Code VBA pour se placer sur le
dernier enregistrement d’un
formulaire :
[Link] , , acLast
Code VBA pour sauvegarder
l’enregistrement en cours :
[Link] acCmdSaveRecord
Code VBA pour supprimer un
enregistrement :
[Link] acCmdDeleteRecord
Code VBA pour fermer le
formulaire en cours :
[Link]
Code VBA pour fermer un
formulaire spécifique :
[Link] acForm, "(nom du formulaire)"
Exemple : [Link] acForm, "F_Clients"
Code VBA pour rafraîchir les
données d’un formulaire ou
actualiser un enregistrement :
J’utilise ce code principalement lorsque je reviens sur un formulaire. Par
exemple, si je modifie une facture pour indiquer qu’elle est réglée et que je
reviens sur mon formulaire d’accueil où je liste les factures non réglées, cela
me permet d’actualiser ma liste et de ne plus voir apparaître cette facture.
[Link] (sur activation du formulaire dans ce cas)
On peut aussi utiliser (nom du
contrôle).Refresh ou [Link] ou (nom du
contrôle).Requery (à voir lequel fonctionne dans votre cas de figure)
Code VBA pour ouvrir un
formulaire :
[Link] "(nom du formulaire)"
Exemple : [Link] "F_Factures"
Code VBA pour ouvrir un
formulaire sur un
enregistrement spécifique :
[Link] "(nom du formulaire)", , , "[(numéro unique
indiqué dans le formulaire de départ)] = " & numéro unique
indiqué dans le formulaire d’arrivée
Exemple : [Link] "F_Clients", , , "[ID_Client] = "
& ID_Client
Code VBA pour se déplacer sur
un onglet spécifique d’un
formulaire :
Ce code peut être combiné au précédent lorsque vous créez une navigation
par onglets.
Forms![(nom du formulaire)]!(nom du groupe
d’onglets).Value = (numéro de l’onglet)
Exemple : Forms![F_Clients]![Link] = 1 (dans ce cas,
je vais sur le 2e onglet, car cela commence à 0)
Code VBA pour ouvrir un état :
[Link] "(nom de l’état) ", acViewPreview (pour
afficher avant impression ouacViewReport pour l’afficher en Mode
État ou acViewNormal pour imprimer l’état)
Exemple : [Link] "E_Factures", acViewPreview
Code VBA pour ouvrir un état sur
un enregistrement spécifique
depuis un formulaire :
[Link] "(nom de l’état)", acViewPreview, ,
"(numéro unique indiqué sur l’état)=" & (numéro unique
indiqué sur le formulaire)
Exemple : [Link] "E_Factures", acViewPreview, ,
"ID_Facture=" & ID_Facture
Les numéros uniques n’ont pas besoin d’apparaître, car il s’agit la plupart du
temps d’un Numéroauto, mais ils doivent être dans la source du formulaire et
de l’état.
Code VBA pour annuler les
messages d’alerte :
Ce code vous évite d’avoir les messages d’avertissements qu’Access affiche
selon l’action effectuée (une requête d’ajout par exemple). Cependant, il est à
utiliser avec précaution, car le retour en arrière ne sera pas possible.
Code VBA à placer en début de procédure : [Link] False
Code VBA à placer en fin de procédure : [Link] True
