[vb] récupération de champ

Résolu
Stikmou -  
Bonjour à tous,

encore un soucis....

j'ai créé un formulaire(LIVRAISON) qui appelle un autre formulaire(LIGNELIVRAISON) : 
Private Sub Commande17_Click()

DoCmd.OpenForm ("LIGNELIVRAISON")

End Sub


Mon soucis est que dans le formulaire (LIVRAISON) je remplie deux Combobox avant d'appuyer sur le bouton qui appelle l'autre formulaire (LIGNELIVRAISON), j'aimerai donc récupérer les deux Combobox(dans LIVRAISON) dans deux Textbox (dans LIGNELIVRAISON).
J'ai déjà essayer pas mal de chose mais malheureusement sans trouver la solution :/

Merci

7 réponses

  1.  lermite222 Contributeur
    Décidément... faut des forceps.. ou une boule de cristal super performante.
    Dans mon poste 5 je demandais...
    Rappel moi EXACTEMENT dans que langage/appli tu travail
    Conseil pour tes prochains topic..
    Titre = [VBA ACCESS] Le libellé...
    Impossible de travailler sur ta BD, elle est verrouillée.
    Mais pour ton problème. 
        TextBox1.Text = Form_LIVRAISON.ComboBox5.Text

    A+
    1. stikmou08
      Je te remercie lermite222, j'aurai une autre question, mais j'ouvrirai un autre topic demain car pour moi c'est très compliqué.
      Dommage que tu ne puisse pas ouvrir ma BDD.
      On verra plus tard, encore merci
  2. Youha
    As tu essayé de passer les valeurs de tes combobox en paramètre de ta sub Commande17_Click()?
    1. Stikmou
      En faites même si je les met en paramètre, ca ne va pas sur le Form_load() de l'autre formulaire(LIGNECOMMANDE), car je ne sais aps comment récupérer l'infomation entre les deux. Ca me marque souvent : Impossible de trouver le champ auquel il est fait référence dans votre expression.
      1. lermite222 Contributeur
        Bonjour,
        Dans le Form_Load de LIGNELIVRAISON tu doit faire référence à la forme qui contient les 2 Combo.
        par exemple 
            Text1.Text = Form("LIVRAISON").Combo1.Text
        A+
        L'expérience instruit plus sûrement que le conseil. (André Gide)
        Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
        NOTE : Je ne répond pas aux MP pour les questions techniques.
        Ça doit se passer sur le forum pour que tous puisse y participer ou en profiter.
        1. Stikmou
          Salut lermite222, merci de prendre de ton temps pour moi (encore une fois :) )

          J'ai fait ce que tu ma dit, mais ca me met une erreur d'execution : impossible de trouver le champ 'LIVRAISON'.

          je te remet mes deux bouts de code :

          Dans le formulaire LIVRAISON : 
          Private Sub Commande17_Click()   

DoCmd.OpenForm ("LIGNELIVRAISON")   
       
End Sub


          Dans le formulaire LIGNELIVRAISON 
          Private Sub Form_load()   

TextBox1.Text = Form("LIVRAISON").ComboBox5.Text   

End Sub
      3.  lermite222 Contributeur
        Rappel moi EXACTEMENT dans que langage/appli tu travail
        Et Hummm, déformation avec Excel, ce devrait être...
        TextBox1.Text = LIVRAISON.ComboBox5.Text
        L'expérience instruit plus sûrement que le conseil. (André Gide)
        Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
        NOTE : Je ne répond pas aux MP pour les questions techniques.
        Ça doit se passer sur le forum pour que tous puisse y participer ou en profiter.
        1. Stikmou
          Je travail dans microsoft Virtual Basic avec ma Base de données dans accès. 
          TextBox1.Text = LIVRAISON.ComboBox5.Text

          Ne fonctionne pas, objet requis :/
        2. lermite222 Contributeur
          Faut quand même vous extraire les renseignements nécessaires avec des forceps...
          VB.6 VB..NET.. ????
          C'EST TOUT A FAIT DIFFÉRENT
          Et quand tu ouvre un nouveau topic, précise DIRECTEMENT quel langage tu emploi.
        3. stikmou08
          c'est du vba 2003
      4. lermite222 Contributeur
        Alors l'exemple de mon poste #5 doit fonctionner.
        Mais je me demande si tu ne confond pas le nom et le caption (ce qui est marquer dans la barre de titre)
        Regarde dans les propriétés de ton 2ém UF la propriété Name
        Et montre le code ou tu appel le 2ém UF.
        1. stikmou08
          Alors, clic droit => propriété=> Il n'y a pas name

          Et le code pour appeler mon 2ieme formulaire (LIGNELIVRAISON) c'est celui plus haut : 
          Private Sub Commande17_Click()   

DoCmd.OpenForm ("LIGNELIVRAISON")   
       
End Sub


          En sachant que Commande17 et un Bouton de commande.
      5. lermite222 Contributeur
        Y a quelque chose qui cloche...
        Met ton classeur sur CiJoint.fr, sinon ont tourne en rond.
        1. stikmou08
          Je t'es fait un petit mp avec tous, tu comprendras :)

      Discussions similaires

      High Sierra : refus de réinstallation "serveur pas contacté"
      pgwz132

      2 réponses
      Erreur "Le nom du champ du tableau croisé dynamique n'est pas valide"
      anastasiaS974

      4 réponses
      Récupérer son compte Leboncoin avec son numéro de téléphone
      Nono

      6 réponses
      macOs High Sierra : « Le serveur de récupération n’a pas pu être contacté »
      songokuuu

      6 réponses
      Colis shein terminal fret
      Lele

      1 réponse