Message d'erreur si valeure négative

moilou2 · 09/10/2008, 11h20

Bonjour, j'ai deux champs, un pour un stock , l'autre pour un prix et ces deux champs doivent être de type numérique (pas de texte, mais des chiffres) et je ne veux pas qu'ils soient négatifs.

Pour cela j'ai utilisé le code suivant:

Code :

If Not IsNumeric(Me.txtPrixUnitaireStock) Then
MsgBox ("Le prix Unitaire Stock doit étre un nombre positif")
   Exit Sub
End If

Donc sa sa me résout le problème que la valeur doit être un nombre?

Mais comment faire pour tester si c'est un nombre positif?

Merci

Domi2 · 09/10/2008, 11h25

Bonjour,

Un test si plus petit que 0 ne résoud pas ton problème ?

Domi2

jpcheck · 09/10/2008, 11h30

salut,
la fonction Abs() peut te venir en aide

Pierre Fauconnier · 09/10/2008, 11h32

Bonjour

Il faut faire attention aux termes que tu emploies.

Un champ dépend d'une table. Si tu parles d'une zone de saisie d'un formulaire, il faut aller parler d'un contrôle.

Vu que tu dois typer les champs d'une table, si ton champ PU est numérique, tu ne sauras saisir dedans que des valeurs numériques... et tu peux alors jouer avec les propriétés Valide si et Message d'erreur pour tester la tentative d'une saisie d'un nombre négatif.

Si tu parles d'un contrôle de formulaire et que ce contrôle est dépendant d'un champ d'une source de données, il suffit de jouer avec les propriétés du champ comme décrit ci-dessus.

Si c'est d'un contrôle indépendant dont tu parles, tu peux alors appliquer la solution de Domi2

moilou2 · 09/10/2008, 11h33

Est ce que dans le même bloc if, je peut poser deux condition et deux message d'erreur différent?

C'est à dire

Si c'est pas numérique alors "La valeur de ce champ doit être un nombre
Si c'est un numérique négatif "La valeur de ce champ doit être un nombre positif.

Et autre petite question, est ce que que dans un message d'erreur, on peut mettre un mot en gras ou en couleur?

Merci

moilou2 · 09/10/2008, 15h06

Bon j'ai fait la part des choses, j'ai mis sa:

Code :

If Not IsNumeric(Me.txtPrixUnitaireStock) Or Me.txtPrixUnitaireStock.Value < 0 Then
MsgBox ("Le prix Unitaire Stock doit étre un nombre positif")
   Exit Sub
End If

Mais est ce que c'est possible alors ou pas dans une msgBox de mettre un mot en gras? ou en couleurs?

Pierre Fauconnier · 09/10/2008, 15h10

Pas dans un MsgBox. Tu dois créer un formulaire dans lequel tu réalises la mise en page que tu veux et l'ouvrir en modal. A mon avis, un peu lourd pour un message de ce type...

moilou2 · 09/10/2008, 15h41

Oui c'est sur!

Mais sa auré pu être possible!

Merci à toi.

09/10/2008, 11h20	#1 (permalink)
moilou2 Débutant(e) Date d'inscription: décembre 2007 Messages: 988	Message d'erreur si valeure négative Bonjour, j'ai deux champs, un pour un stock , l'autre pour un prix et ces deux champs doivent être de type numérique (pas de texte, mais des chiffres) et je ne veux pas qu'ils soient négatifs. Pour cela j'ai utilisé le code suivant: Code : If Not IsNumeric(Me.txtPrixUnitaireStock) Then MsgBox ("Le prix Unitaire Stock doit étre un nombre positif") Exit Sub End If Donc sa sa me résout le problème que la valeur doit être un nombre? Mais comment faire pour tester si c'est un nombre positif? Merci

09/10/2008, 11h25	#2 (permalink)
Domi2 Expert Confirmé Sénior Date d'inscription: juin 2006 Localisation: Entre Jura et Mont-Blanc Âge: 48 Messages: 2 138	Bonjour, Un test si plus petit que 0 ne résoud pas ton problème ? Domi2 __________________ Vous avez des montres, nous avons le temps ! (citation attribuée à L.-S. Senghor) Ici, on ne perd pas de temps ! On en passe...

09/10/2008, 11h30	#3 (permalink)
jpcheck Expert Confirmé Sénior Date d'inscription: juillet 2007 Localisation: RP Âge: 24 Messages: 2 925	salut, la fonction Abs() peut te venir en aide __________________ Piou-Piou Poussin Developpeur Pas de question technique par MP, je ne réponds pas Mon perso ? Une vraie brute

09/10/2008, 11h32	#4 (permalink)
Pierre Fauconnier Rédacteur/Modérateur Date d'inscription: novembre 2003 Localisation: Theux (Belgique) Âge: 41 Messages: 3 112	Bonjour Il faut faire attention aux termes que tu emploies. Un champ dépend d'une table. Si tu parles d'une zone de saisie d'un formulaire, il faut aller parler d'un contrôle. Vu que tu dois typer les champs d'une table, si ton champ PU est numérique, tu ne sauras saisir dedans que des valeurs numériques... et tu peux alors jouer avec les propriétés Valide si et Message d'erreur pour tester la tentative d'une saisie d'un nombre négatif. Si tu parles d'un contrôle de formulaire et que ce contrôle est dépendant d'un champ d'une source de données, il suffit de jouer avec les propriétés du champ comme décrit ci-dessus. Si c'est d'un contrôle indépendant dont tu parles, tu peux alors appliquer la solution de Domi2 __________________ Pierre Fauconnier -------------------- "Plus les hommes seront éclairés, plus ils seront libres" (Voltaire) Pensez au tag Mon blog sur DVP - Mes petits papiers sur DVP Je ne peux en aucun cas être tenu pour responsable des conséquences de l'utilisation des codes que je fournis dans le cadre des réponses apportées sur les forums, même s'il s'avérait que ces codes sont erronés ou amènent à des dysfonctionnements, de manière manifeste ou non.

09/10/2008, 15h06	#6 (permalink)
moilou2 Débutant(e) Date d'inscription: décembre 2007 Messages: 988	Bon j'ai fait la part des choses, j'ai mis sa: Code : If Not IsNumeric(Me.txtPrixUnitaireStock) Or Me.txtPrixUnitaireStock.Value < 0 Then MsgBox ("Le prix Unitaire Stock doit étre un nombre positif") Exit Sub End If Mais est ce que c'est possible alors ou pas dans une msgBox de mettre un mot en gras? ou en couleurs?

09/10/2008, 11h33	#5 (permalink)
moilou2 Débutant(e) Date d'inscription: décembre 2007 Messages: 988	Est ce que dans le même bloc if, je peut poser deux condition et deux message d'erreur différent? C'est à dire Si c'est pas numérique alors "La valeur de ce champ doit être un nombre Si c'est un numérique négatif "La valeur de ce champ doit être un nombre positif. Et autre petite question, est ce que que dans un message d'erreur, on peut mettre un mot en gras ou en couleur? Merci

09/10/2008, 15h10	#7 (permalink)
Pierre Fauconnier Rédacteur/Modérateur Date d'inscription: novembre 2003 Localisation: Theux (Belgique) Âge: 41 Messages: 3 112	Pas dans un MsgBox. Tu dois créer un formulaire dans lequel tu réalises la mise en page que tu veux et l'ouvrir en modal. A mon avis, un peu lourd pour un message de ce type... __________________ Pierre Fauconnier -------------------- "Plus les hommes seront éclairés, plus ils seront libres" (Voltaire) Pensez au tag Mon blog sur DVP - Mes petits papiers sur DVP Je ne peux en aucun cas être tenu pour responsable des conséquences de l'utilisation des codes que je fournis dans le cadre des réponses apportées sur les forums, même s'il s'avérait que ces codes sont erronés ou amènent à des dysfonctionnements, de manière manifeste ou non.

09/10/2008, 15h41	#8 (permalink)
moilou2 Débutant(e) Date d'inscription: décembre 2007 Messages: 988	Oui c'est sur! Mais sa auré pu être possible! Merci à toi.

		Forum des développeurs > Hardware, Systèmes et Logiciels > Microsoft Office > Access > VBA Access
Message d'erreur si valeure négative

Outils de la discussion
Afficher une version imprimable Envoyer un lien vers cette page par email