已答复 Actualiser un sous-fomulaire

  • 2011年10月16日 8:26
     
     

    bonjour

    je suis sur une version 2003.

    Après un ajout  dans une table, à l'aide d'un formulaire; lorsque je reviens sur le formulaire "père", je ne retrouve pas ces nouveaux ajouts, que je voudrais visualiser sous forme de liste déroulante.


    Alain D

全部回复

  • 2011年10月16日 8:47
     
     

    Bonjour
    sur l'événement Enter ou Gotfocus le la liste, utiliser la méthode Requery
    Cdt
    <papyx> a écrit dans le message de news: 8dba00cf-b0be-4bf5-964a-debbcfce76ec@communitybridge.codeplex.com...

    bonjour

    je suis sur une version 2003.

    Après un ajout dans une table, à l'aide d'un formulaire; lorsque je reviens sur le formulaire "père", je ne retrouve pas ces nouveaux ajouts, que je voudrais visualiser sous forme de liste déroulante.


    Alain D

  • 2011年10月17日 8:57
     
     

    bjr blaise

    pas moyen de récupérer le dernier ajout. J'ai essayé comme indiqué.

    Je ne sais pas très bien utiliser la méthode "requery"

     


    Alain D
  • 2011年10月17日 15:39
     
     已答复 包含代码

    Hello Papyx,

    Si j'ai bien compris : votre formulaire est ouvert et par ailleurs vous ajoutez une ligne dans une table.

    Dans ce formulaire vous avez une liste déroulante basée sur cette table, soit directement soit via une requête.

    Dans ce cas, allez dans les propriétés de cette liste, sur l'onglet événements, à la ligne "sur réception focus" (ou "sur entrée"), Double-cliquez sur le texte "sur réception focus...............", "[Procédure événementielle]" apparait à sa droite, cliquez sur le bouton [...] tout à droite de la ligne.

    Vous entrez ainsi dans le VBA et dans une procédure événementielle.  Le code sera exécuté lorsque la liste reçoit le focus.  Entre Private Sub et End Sub, tapez « me. » après le point, une liste apparait, choisissez le nom de la liste déroulante, ajoutez un « . » suivi d'un « Requery »

    Exemple pour une liste nommée "Lst_Ma_Liste

    Private Sub Lst_Ma_Liste_GotFocus()
        Me.Lst_Ma_Liste.Requery
    End Sub
    
    


    Cdt,

    Blaise

    • 已标记为答案 papyx 2011年10月17日 16:44
    •  
  • 2011年10月17日 16:47
     
     

    salut blaise

    J'ai finalement réussi; j'avais un problème de syntaxe pour l'utilisation de "requery".

    Merci pour tout.

    AD


    Alain D