Traduction Code VBA..

Résolu/Fermé
Utilisateur anonyme - 5 nov. 2007 à 10:37
 Utilisateur anonyme - 7 nov. 2007 à 10:50
Bonjour,
Je voudrais savoir ce que fait cette fonction.. dans l'ordre SVP..

Private Sub Bouton9_Click()
On Error GoTo Err_Bouton9_Click

Dim DocName As String
Dim LinkCriteria As String

DoCmd.Close

DocName = "Demande champ 1 et 6"
DoCmd.OpenForm DocName, , , LinkCriteria

Nom_form_Next = "Réception de composant"
Nom_form_Before = "Menu principal"


Exit_Bouton9_Click:
Exit Sub

Err_Bouton9_Click:
MsgBox Error$
Resume Exit_Bouton9_Click

End Sub

Merci..
A voir également:

6 réponses

voici la traduction de ton code


Private Sub Bouton9_Click() : déclaration de ta procédure nommée bouton9
On Error GoTo Err_Bouton9_Click : en cas d'erreur aller à (Err_Bouton_Click:) pour renvoyer un message d'erreur

Dim DocName As String : déclaration de la variable DocName
Dim LinkCriteria As String : déclaration de la variable LinkCriteria

DoCmd.Close : fermeture de tout ce qui est ouvert

DocName = "Demande champ 1 et 6" : attribution d'un mon à la variable DocName
DoCmd.OpenForm DocName, , , LinkCriteria : ouverture du formulaire "Demande champ 1 et 6" avec un critère non défini (LinkCriteria)

Nom_form_Next = "Réception de composant" : attribution d'un mon à la variable Nom_form_Next
Nom_form_Before = "Menu principal" : attribution d'un mon à la variable Nom_form_Next


Exit_Bouton9_Click : interruption du programme
Exit Sub : sortir de la procédure

Err_Bouton9_Click: interruption du programme en cas d'erreur
MsgBox Error$ : message en cas d'erreur
Resume Exit_Bouton9_Click : interruption en cas d'erreur

End Sub : fin procédure

j'espère que ça peut d'aider.....
0
Utilisateur anonyme
5 nov. 2007 à 11:36
C'est quoi la variable Nom_form_next et quand est ce que elle intervient STP??
0
Bonjour,

ces variables ne font qu'afficher des formulaires nommés
"Réception de composant"
"Menu principal"
et ce sont des variables publiques qui sont utilisées quelque part dans un autre module et n' interviennent qu'après l'ouverture du formulaire "Demande champ 1 et 6" .
0
Utilisateur anonyme
5 nov. 2007 à 13:59
Le truc c'est que Demande champ 1 et 6 est un sous formulaire de la reception de composants.. (On y renseigne le numero d'activité pour laquelle on a besoin du composant et elle nous renvoie vers la reception des composants avec les caractéristiques du composant...) et moi je voulais rajouter un champ (Date de livraison réele) ds le formulaire réception de composants.. mais logiquement ce champ là, doit venir de la sous requete (demande champ 1 et 6) et j'arrive pas à trouver comment et ou la sous requete manipule les données qui apparaissent apres dans la récéption.. J'essaie d'expliciter un prblm assez compliqué( du moins pr moi..) , je sais pas si t'arrive à me comprendre..
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Bonjour,

dis mois si ton code VBA est Excel VBA ou Code VBA Access
0
Utilisateur anonyme
7 nov. 2007 à 10:50
C un code VBA ACCESS du moins je pense car je traville sur ACCESS, et je ne suis ni specialiste en VBA ni en ACCESS..
J'ai "essayé" d'expliciter mon problème dans la discussion suivante
https://forums.commentcamarche.net/forum/affich-3971846-requetes-et-formuliares-access#0
Merci..
0