Comment mettre une condition pour informer l'utilisateur qu'il n'y a plus
d'enregistrements à visualiser, afin d'éviter une boite standard d'access ?
En vba par exemple ou macro dans un formulaire en mode continu.
AtteindreEnregistrement
Suivant
Si le suivant n'existe pas alors, boite "il n'y a plus rien"!
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
3stone
Salut,
"Philippe" | Comment mettre une condition pour informer l'utilisateur qu'il n'y a plus | d'enregistrements à visualiser, afin d'éviter une boite standard d'access ? | | En vba par exemple ou macro dans un formulaire en mode continu. | AtteindreEnregistrement | Suivant | Si le suivant n'existe pas alors, boite "il n'y a plus rien"!
Tu as créé tes propres boutons avec l'assistant ?
Si oui, modifie le code du bouton et plus particulièrement la gestion d'erreur pour avoir qque chose comme ceci pour le bouton "Suivant" :
Err_Commande0_Click:
If Err.Number = 2105 Then MsgBox "Dernier enregistrement..." Else MsgBox Err.Number & " " & Err.Description End If
"Philippe"
| Comment mettre une condition pour informer l'utilisateur qu'il n'y a plus
| d'enregistrements à visualiser, afin d'éviter une boite standard d'access ?
|
| En vba par exemple ou macro dans un formulaire en mode continu.
| AtteindreEnregistrement
| Suivant
| Si le suivant n'existe pas alors, boite "il n'y a plus rien"!
Tu as créé tes propres boutons avec l'assistant ?
Si oui, modifie le code du bouton et plus particulièrement la gestion d'erreur
pour avoir qque chose comme ceci pour le bouton "Suivant" :
Err_Commande0_Click:
If Err.Number = 2105 Then
MsgBox "Dernier enregistrement..."
Else
MsgBox Err.Number & " " & Err.Description
End If
"Philippe" | Comment mettre une condition pour informer l'utilisateur qu'il n'y a plus | d'enregistrements à visualiser, afin d'éviter une boite standard d'access ? | | En vba par exemple ou macro dans un formulaire en mode continu. | AtteindreEnregistrement | Suivant | Si le suivant n'existe pas alors, boite "il n'y a plus rien"!
Tu as créé tes propres boutons avec l'assistant ?
Si oui, modifie le code du bouton et plus particulièrement la gestion d'erreur pour avoir qque chose comme ceci pour le bouton "Suivant" :
Err_Commande0_Click:
If Err.Number = 2105 Then MsgBox "Dernier enregistrement..." Else MsgBox Err.Number & " " & Err.Description End If