Traduction Code VBA.. Résolu/Fermé

Question

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..

Djeté · Answer

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.....

Utilisateur anonyme · Answer

C'est  quoi  la variable Nom_form_next et quand est ce que elle intervient STP??

Djeté · Answer

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" .

Utilisateur anonyme · Answer

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..

Djeté · Answer

Bonjour, 

dis mois si ton code VBA est Excel VBA ou Code VBA Access

Utilisateur anonyme · Answer

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..

Traduction Code VBA..

6 réponses

Discussions similaires