Form.Événement actuel (Access)

Se produit lorsque le focus passe à un enregistrement donné pour en faire l'enregistrement activé, ou lorsque le formulaire est actualisé ou qu'il fait l'objet d'une nouvelle requête.

Syntaxe

expression. En cours

expressionVariable qui représente un objetForm.

Remarques

Pour exécuter une macro ou une procédure événementielle lorsque cet événement se produit, définissez la propriété OnCurrent sur le nom de la macro ou [procédure événementielle].

Cet événement se produit à la fois lors de l'ouverture d'un formulaire et lorsque le focus passe d'un enregistrement à un autre. Microsoft Access exécute la macro en cours ou procédure événementielle avant le premier ou le prochain enregistrement s'affiche.

En exécutant une procédure de macro ou d’événement lorsque l’événement en cours d’un formulaire se produit, vous pouvez afficher un message ou synchroniser des enregistrements sous un autre formulaire lié à l’enregistrement actuel. Par exemple, lorsque l'enregistrement d'un client devient actif, vous pouvez afficher la commande précédente de ce client. Lorsqu’un enregistrement fournisseur est actif, vous pouvez afficher les produits fabriqués par le fournisseur dans un formulaire Fournisseurs . Vous pouvez également effectuer des calculs en fonction de l'enregistrement activé, ou modifier le formulaire en réponse aux données de l'enregistrement actif.

Si votre procédure de macro ou d’événement exécute une action GoToControl ou GoToRecord ou la méthode correspondante de l’objet DoCmd en réponse à un événement Open , l’événement actuel se produit.

L’événement actuel se produit également lorsque vous actualisez un formulaire ou réinterrogez la table ou requête sous-jacente du formulaire (par exemple, lorsque vous choisissez Supprimer le filtre/trier dans le menu Enregistrements ou lorsque vous utilisez l’action Réinterroger dans une macro ou la méthode Réinterroger dans du code Visual Basic).

Lorsque vous ouvrez un formulaire pour la première fois, les événements suivants se produisent dans cet ordre :

Open → charge → redimensionner → Activer → actuel

Exemple

Dans l’exemple suivant, une procédure Événement en cours vérifie le status d’un bouton d’option appelé Discontinued. Si le bouton est sélectionné, l’exemple définit la couleur d’arrière-plan du champ NomProduit sur rouge pour indiquer que le produit a été abandonné.

Pour essayer l’exemple, ajoutez la procédure événementielle suivante à un formulaire contenant une option intitulée Discontinued (abandonné) et une zone de texte intitulée NomProduit.

Private Sub Form_Current() 
 If Me!Discontinued Then 
 Me!ProductName.BackColor = 255 
 EndIf 
End Sub

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.