[AC-2000] valeur null égale à 0 [Résolu]

[Anthoto]

Bonjour à tous est bon début de semaine.

j'ai un petit soucis, très bête, mais qui me pose problème quand même, peut-être pourriez-vous me donner un coup de pouce.

voila c'est très simple, j'ai une Zone de texte avec comme valeur par défaut 0
j'aimerais que, si l'utilisateur supprime le 0 et n'entre pas de valeur à la place, ma Zone de texte se remette à 0.
ça parait un peu bête néanmoins je me casse la tête là dessus depuis 1 heure sans succès.
j'ai essayé plusieurs chose en vba en particulier ceci :

Code :

1
2
3
If Me.MaZoneDeTexte.Value = "" Then
Me.MaZoneDeTexte.Value = "0"
End If

qui me semblait la chose la plus logique, mais ça ne fonctionne pas.

[GAYOT]

Bonjour
Plusieurs façons:
Sur la longueur de la chaine

Code :

1
2
3
If Len(Me.MaZoneDeTexte.Value ) = 0 Then
Me.MaZoneDeTexte.Value = "0"
End If

si la valeur nulle

Code :

1
2
3
If IsNull(Me.MaZoneDeTexte.Value) Then
Me.MaZoneDeTexte.Value = "0"
End If

Ou avec la fonction Nz qui donnera automatiquement la valeur 0 en cas de Null

Code :

Nz(Me.MaZoneDeTexte.Value,"0")

J'ai supposé que votre champ était de type Texte

[Anthoto]

je te remercie beaucoup pour la rapidité et l'efficacité Gayot.
j'ai utilisé la deuxième de tes proposition et cela fonctionne impeccablement bien.
Encore Merci
sujet Résolu.