Événement Form.Current (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. Actuelle

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 macro ou une procédure événementielle lorsque l’événement Actuel d’un formulaire se produit, vous pouvez afficher un message ou synchroniser les enregistrements dans un autre formulaire lié à l’enregistrement actif. Par exemple, lorsque l'enregistrement d'un client devient actif, vous pouvez afficher la commande précédente de ce client. Lorsqu’un enregistrement de fournisseur devient à jour, 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 macro ou procédure événementielle 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 Current se produit.

L’événement Current se produit également lorsque vous actualisez un formulaire ou réexécutez la table ou la requête sous-jacente du formulaire, par exemple, lorsque vous choisissez Supprimer le filtre/trier dans le menu Enregistrements ou que vous utilisez l’action Requery dans une macro ou la méthode Requery dans le 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énementielle Actuelle vérifie l’état 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 ProductName sur rouge pour indiquer que le produit a été abandonné.

Pour essayer l’exemple, ajoutez la procédure événementielle suivante à un formulaire qui contient une option appelée Discontinued et une zone de texte appelée ProductName.

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.