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
Jessy Sempere [MVP]
Bonjour
Ce code test l'argument OpenArg du formulaire actif, ce test permet de savoir si ce formulaire a été ouvert par le code avec comme argument d'ouverture "GoToNew".
Ensuite il test la valeur du champ CategoryId, il vérifis que la valeur n'est pas null, en gros je pense qu'il test si il est sur un nouvel enregistrement ou non...
Donc si ces 2 conditions sont restpectées alors il exécute la ligne de code :
DoCmd.DoMenuItem acFormBar, 3, 0, , acMenuVer70
Cette ligne permet d'atteindre un nouvel enregistrement.
Si je resume, en gros ce code dit, si on a demander lors de l'ouverture du formulaire d'aller sur un nouvel enregistrement et qu'il n'y est pas déjà, alors on y va...
@+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------ "martin" a écrit dans le message news: 1788b01c41886$aab83620$
Bonjour,
quelqu un peut il m expliquer la signification de cette commande:
If Me.OpenArgs = "GotoNew" And Not IsNull([CategoryID]) Then DoCmd.DoMenuItem acFormBar, 3, 0, , acMenuVer70 End If
Merci!
Bonjour
Ce code test l'argument OpenArg du formulaire actif, ce test permet de
savoir si ce formulaire a été ouvert par le code avec comme argument
d'ouverture "GoToNew".
Ensuite il test la valeur du champ CategoryId, il vérifis que la valeur
n'est
pas null, en gros je pense qu'il test si il est sur un nouvel enregistrement
ou non...
Donc si ces 2 conditions sont restpectées alors il exécute la ligne de code
:
DoCmd.DoMenuItem acFormBar, 3, 0, , acMenuVer70
Cette ligne permet d'atteindre un nouvel enregistrement.
Si je resume, en gros ce code dit, si on a demander lors de l'ouverture
du formulaire d'aller sur un nouvel enregistrement et qu'il n'y est pas
déjà,
alors on y va...
@+
Jessy Sempere - Access MVP
news@access.fr.vu
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"martin" <anonymous@discussions.microsoft.com> a écrit dans le message news:
1788b01c41886$aab83620$a101280a@phx.gbl...
Bonjour,
quelqu un peut il m expliquer la signification de cette
commande:
If Me.OpenArgs = "GotoNew" And Not IsNull([CategoryID])
Then
DoCmd.DoMenuItem acFormBar, 3, 0, , acMenuVer70
End If
Ce code test l'argument OpenArg du formulaire actif, ce test permet de savoir si ce formulaire a été ouvert par le code avec comme argument d'ouverture "GoToNew".
Ensuite il test la valeur du champ CategoryId, il vérifis que la valeur n'est pas null, en gros je pense qu'il test si il est sur un nouvel enregistrement ou non...
Donc si ces 2 conditions sont restpectées alors il exécute la ligne de code :
DoCmd.DoMenuItem acFormBar, 3, 0, , acMenuVer70
Cette ligne permet d'atteindre un nouvel enregistrement.
Si je resume, en gros ce code dit, si on a demander lors de l'ouverture du formulaire d'aller sur un nouvel enregistrement et qu'il n'y est pas déjà, alors on y va...
@+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------ "martin" a écrit dans le message news: 1788b01c41886$aab83620$
Bonjour,
quelqu un peut il m expliquer la signification de cette commande:
If Me.OpenArgs = "GotoNew" And Not IsNull([CategoryID]) Then DoCmd.DoMenuItem acFormBar, 3, 0, , acMenuVer70 End If
