Discussion :

[euskal75]

Bonjour,
J'ai un problème lors d'une saisie de formulaire.Je m'explique: Dans mon formulaire FOURNISSEUR , j'ai une liste déroulante reprenant les différents interlocuteurs de ce fournisseur.Si dans ma liste déroulante, je ne retrouve pas l'interlocuteur concerné, j'ai un bouton sur lequel je peux cliquer pour aller ajouter l interlocuteur dans ma base interlocuteur.
Mon problème est que quand je reviens sur mon formulaire FOURNISSEUR, l enregistrement que je viens d'ajouter n'est toujours pas visible.Il faut que je sorte du formulaire FOURNISSEUR et y re-rentre pour que la dernière saisie apparaisse dans ma liste déroulante.
Sur mon bouton de sortie du formulaire saisie interlocuteur, j ai mis un Requery et un Refresh, rien n'y fait.
Petite précision qui doit avoir son importance....Si dans mon formulaire FOURNISSEUR, je ne clique PAS sur ma liste déroulante avant d'aller renseigner la table interlocuteurs, lorsque je reviens sur le formulaire FOURNISSEUR, le nouvel interlocuteur apparait....
Quelqu'un comprend il ce qui se passe pour me donner une solution?
En espérant avoir été claire...

[pgz]

Bonjour,

Tu peux faire un .requery sur la liste de choix. Par exemple sur fermeture de ton formulaire qui ajoute un interlocuteur, tu fais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Forms!Fournisseurs.MalisteDeChoix.Requery

Bon courage,

PGZ

[euskal75]

je vais tester ça et reviens boucler le post si c'est ok.
merci

[euskal75]

Allons bon, dans mon cas ca donne :

Forms!CONTACT_LABO_SAISIE.CONTACT.Requery

Et bien il n'en veut pas....
Erreur : Impossible de trouver le formulaire CONTACT_LABO_SAISIE auquel il est fait référence dans une expression de macro ou un code visual basic
N'ayant pas encore compris, quand on doit mettre des ! ou des .
j ai tenté de mettre

[Formulaires]![CONTACT LABO SAISIE]![CONTACT].Requery

C'est pareil
Je suis pourtant sûre du nom de mon formulaire.Les espaces dans les noms de formulaires peuvent ils poser des problèmes??

[tee_grandbois]

Je suis pourtant sûre du nom de mon formulaire.Les espaces dans les noms de formulaires peuvent ils poser des problèmes??

Bonsoir,
Si tu es sûre du nom de ton formulaire, pourquoi le nommes-tu une fois avec des soulignés : Forms!CONTACT_LABO_SAISIE et une autre fois avec des espaces :[Formulaires]![CONTACT LABO SAISIE] ?
Sinon, si c'est le formulaire actif, contentes-toi de mettre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.Requery

[Heureux-oli]

Il y a plus joli que un bouton, si tu mets la combobox limiter à liste, si le nom n'existe pas, un code s'exécute et avec ce code, tu peux ajouter ce qui te manque.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
Private Sub RéfClient_NotInList(NewData As String, Response As Integer)
Dim entDemande As Integer
Dim bds As Database, rst As Recordset
 
entDemande = MsgBox("Ajouter un nouveau client ?", vbQuestion + vbYesNo)
 
If entDemande = vbYes Then
 
    Set bds = CurrentDb
    Set rst = bds.OpenRecordset("tblClients")
    rst.AddNew
    rst!Nom = NewData
    rst.Update
    Response = acDataErrAdded
    MsgBox ("Il faut mettre les données à jour!!!")
Else
    'Response = acDataErrDisplay
    Exit Sub
 
End If
rst.Close
End Sub

Tu peux accomoder le code à ton goût.

[euskal75]

En fait, c'était un mix des deux qu'il fallait
Forms![CONTACT LABO SAISIE].[CONTACT].Requery
Que de perte de temps lorsqu'on débute
Merci à vous
En effet, Heureux Oli, ta proposition est plus sympa que le bouton mais...ca urge, je me pencherai là-dessus plus tard!