Remplir un champ en fonction d'un autre

[nachise]

Bonjour,
Dans mon formulaire de saisie, si l'utilisateur inscrit un numéro dans le champ Loineuf (nombre), le champ suivant qui est Pistolet (Oui/Non) devrait inscrire Oui.
Voici mon code qui ne fonctionne pas

Private Sub Texte78_LostFocus()
If Me.loineuf = "" Then
    Me.Pistolet = "Oui"
Else
   Me.Pistolet = "Non"
End If
End Sub

Merci de bien vouloir m'aider

 

[chris]

Re : Remplir un champ en fonction d'un autre

Bonjour

Tu parles de nombre donc >0 me parait plus approprié que =""

 

[nachise]

Re : Remplir un champ en fonction d'un autre

Bonjour Chris,
Mon champ Loineuf est "texte" sauf qu'il est rempli par des chiffres.
Dois-je ajouter un query ou recordset et comment?
Merci de vous occuper de moi

 

[chris]

Re : Remplir un champ en fonction d'un autre

Re

Tant qu'un champ n'est pas rempli il est null : donc tester isnull(champ) ou champ is null (je n'est plus la syntaxe en tête pour la VBA)

 

[nachise]

Re : Remplir un champ en fonction d'un autre

Bonjour-bonsoir Chris
Merci de m'avoir éclairée...
J'ai mis Loineuf en numérique et utilisé 0 et 1 pour vrai ou faux du champ oui/non!
Voici mon nouveau code :

Private Sub Modifiable101_LostFocus()
If Me.Paye <> 0 Then
Me.Actif = "Oui"
Else
Me.Actif = "Non"
End If
End Sub

Private Sub Texte78_LostFocus()
If Me.Loineuf <> 0 Then
Me.Pistolet = "Oui"
Else
Me.Pistolet = "Non"
End If
End Sub

Un GROS merci et à une prochaine peut-être!

 

[nachise]

Re : Remplir un champ en fonction d'un autre

Et je mets où RÉSOLU????