Discussion :

[OlivierC69]

Salut à tous,

Voici encore un petit soucis,

Je voudrais définir une condition dans la valeur par défaut d'une zone texte du genre :

Si [champ] < 0 [valeur défaut]=1 sinon [valeur défaut]=2


Merci pour votre aide

[cain.patres]

bonjours,

tu peux effectuer ton test dans une procédure évenementielle "sur sortie"

tu fais ta condition et tu applique le résultat que tu veux.

[cain.patres]

Code :

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

1
2
3
4
5
6
7
 
 
if forms![nom_formulaire]![nom_champ].value < 0 then
     forms![nom_formulaire]![nom_champ].value = -1
else
     forms![nom_formulaire]![nom_champ].value = 2
end if

[pgz]

Bonjour,

La zone de texte pour laquelle tu veux modifier la valeur par défaut est-elle indépendante?

pgz

[OlivierC69]

Bonsoir

Non cette zone de texte n'est pas indépendante

A+

[pgz]

Re,

Pourqoui vouloir changer la valeur par défaut au lieu de forcer directement la valeur? Je suppose que [champ] correspond aussi à un contrôle du formulaire.
Sur mise à jour de champ, une procédure du genre

Code :

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

1
2
3
4
5
6
7
If IsNull(Me.Champ) then 
    Me.ZoneDeTexte = Null 
    exit sub
Else
    MeZoneDeTexte = Iif(Me.Champ<0,1,2)
end if
end sub

mettra la valeur correcte dans ZoneDeTexte.

pgz