Traduction Code VBA..

Résolu
Utilisateur anonyme -  
 Utilisateur anonyme -
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..
--

J'aime pas les vieux..

6 réponses

  1. Djeté
     
    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
  2. Utilisateur anonyme
     
    C'est quoi la variable Nom_form_next et quand est ce que elle intervient STP??
    0
  3. Djeté
     
    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
  4. Utilisateur anonyme
     
    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
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. Djeté
     
    Bonjour,

    dis mois si ton code VBA est Excel VBA ou Code VBA Access
    0