Discussion :

[olive323]

Bonjour à tous,

J'ai une liste déroulante modifiable reliée a une table client , quand je saisie une valeur qui n'est pas dans la liste , j'ai le message "aucun enregistrement en cours".

Comme puis-je faire pour que ce message n'apparaisse pas?

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
24
Private Sub client_AfterUpdate()
Dim ligne As Recordset: Dim base As Database
 
 
Set base = Application.CurrentDb
Set ligne = base.OpenRecordset("SELECT client FROM table_client WHERE client='" & client.Value & "'", dbOpenDynaset)
 
ligne.MoveFirst
 
num_client.Value = ligne.Fields("client").Value
 
 
 
DoCmd.Requery
 
 
ligne.Close
base.Close
Set ligne = Nothing
Set base = Nothing
 
num_client.SetFocus
 
End Sub

Merci pour votre aide

[olive323]

Merci, mais
je vois pas trop ou placer ce code?

[hyperion13]

Salut
Je ne sais pas à qui vous répondez dans le Post#2
Alors si vous voulez saisir une nouvelle valeur, non présente dans la liste, donc dans la table, il faut utiliser ceci.

[olive323]

Salut
Je ne sais pas à qui vous répondez dans le Post#2
Alors si vous voulez saisir une nouvelle valeur, non présente dans la liste, donc dans la table, il faut utiliser ceci.

Salut,

Non je veux juste que le code ne renvoi pas les champs adresse et pays si le client n'est pas dans la liste.

Par exemple, je saisi bernard dans le champs client (liste déroulante), je voudrais pouvoir ensuite saisir dans le champs adresse et pays, sans que le message aucun enregistrement en cours ne s'affiche.

J'ai essayé avec If, If not rien a faire

[olive323]

Salut,

Non je veux juste que le code ne renvoi pas les champs adresse et pays si le client n'est pas dans la liste.

Par exemple, je saisi bernard dans le champs client (liste déroulante), je voudrais pouvoir ensuite saisir dans le champs adresse et pays, sans que le message aucun enregistrement en cours ne s'affiche.

J'ai essayé avec If, If not rien a faire

Bonjour

Merci pour ces quelques pistes, finalement j'ai trouvé sur le site bonbache.fr super site tres bien expliqué.