Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Décimale ,0 ou ,5

Décimale ,0 ou ,5

6 réponses
Avatar
Florian
Bonsoir
J'ai sur un userform des textbox.
Je souhaite que l'utilisateur, ne puisse saisir qu'une sorte de décimale ,5
ou pas de décimales
Merci pour votre aide
Flo riant
Signaler un problème avec ce contenu

6 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Daniel
Quelle règle appliquer ? Arrondi ? ou message d'erreur ?
Daniel
"Florian" a écrit dans le message de news:
OZ0h%
Bonsoir
J'ai sur un userform des textbox.
Je souhaite que l'utilisateur, ne puisse saisir qu'une sorte de décimale
,5 ou pas de décimales
Merci pour votre aide
Flo riant



Avatar
Florian
Re Daniel et merci
Appliquer un message d'erreur
du genre "vous ne pouvez saisir que ,5 ou rien"
En fait c'est pour saisir des jours et ceux-ci ne peuvent qu'être entier ou
1/2 donc ,5
Flo riant

"Daniel" a écrit dans le message de news:

Quelle règle appliquer ? Arrondi ? ou message d'erreur ?
Daniel
"Florian" a écrit dans le message de news:
OZ0h%
Bonsoir
J'ai sur un userform des textbox.
Je souhaite que l'utilisateur, ne puisse saisir qu'une sorte de décimale
,5 ou pas de décimales
Merci pour votre aide
Flo riant







Avatar
Daniel
Essaie :

Dim Var As Double
Var = CDbl(UserForm1.TextBox1.Value) -
Int(CDbl(UserForm1.TextBox1.Value))
If Var <> 0 Then
MsgBox ("Erreur")
End If

Daniel
"Florian" a écrit dans le message de news:
%
Re Daniel et merci
Appliquer un message d'erreur
du genre "vous ne pouvez saisir que ,5 ou rien"
En fait c'est pour saisir des jours et ceux-ci ne peuvent qu'être entier
ou 1/2 donc ,5
Flo riant

"Daniel" a écrit dans le message de news:

Quelle règle appliquer ? Arrondi ? ou message d'erreur ?
Daniel
"Florian" a écrit dans le message de news:
OZ0h%
Bonsoir
J'ai sur un userform des textbox.
Je souhaite que l'utilisateur, ne puisse saisir qu'une sorte de décimale
,5 ou pas de décimales
Merci pour votre aide
Flo riant











Avatar
Florian
Désolé Daniel
cela plante où me lance le msgbox dès qu'un chiffre est saisi n'importe quel
chiffre
Flo riant

"Daniel" a écrit dans le message de news:

Essaie :

Dim Var As Double
Var = CDbl(UserForm1.TextBox1.Value) -
Int(CDbl(UserForm1.TextBox1.Value))
If Var <> 0 Then
MsgBox ("Erreur")
End If

Daniel
"Florian" a écrit dans le message de news:
%
Re Daniel et merci
Appliquer un message d'erreur
du genre "vous ne pouvez saisir que ,5 ou rien"
En fait c'est pour saisir des jours et ceux-ci ne peuvent qu'être entier
ou 1/2 donc ,5
Flo riant

"Daniel" a écrit dans le message de news:

Quelle règle appliquer ? Arrondi ? ou message d'erreur ?
Daniel
"Florian" a écrit dans le message de news:
OZ0h%
Bonsoir
J'ai sur un userform des textbox.
Je souhaite que l'utilisateur, ne puisse saisir qu'une sorte de
décimale ,5 ou pas de décimales
Merci pour votre aide
Flo riant















Avatar
Daniel
Je l'ai testé avec un bouton de commande, après saisie dans un textbox.
Daniel
"Florian" a écrit dans le message de news:

Désolé Daniel
cela plante où me lance le msgbox dès qu'un chiffre est saisi n'importe
quel chiffre
Flo riant

"Daniel" a écrit dans le message de news:

Essaie :

Dim Var As Double
Var = CDbl(UserForm1.TextBox1.Value) -
Int(CDbl(UserForm1.TextBox1.Value))
If Var <> 0 Then
MsgBox ("Erreur")
End If

Daniel
"Florian" a écrit dans le message de news:
%
Re Daniel et merci
Appliquer un message d'erreur
du genre "vous ne pouvez saisir que ,5 ou rien"
En fait c'est pour saisir des jours et ceux-ci ne peuvent qu'être entier
ou 1/2 donc ,5
Flo riant

"Daniel" a écrit dans le message de news:

Quelle règle appliquer ? Arrondi ? ou message d'erreur ?
Daniel
"Florian" a écrit dans le message de news:
OZ0h%
Bonsoir
J'ai sur un userform des textbox.
Je souhaite que l'utilisateur, ne puisse saisir qu'une sorte de
décimale ,5 ou pas de décimales
Merci pour votre aide
Flo riant



















Avatar
Florian
Désolé, cela plante chez moi
Merci de ton aide
Flo riant



"Daniel" a écrit dans le message de news:
%
Je l'ai testé avec un bouton de commande, après saisie dans un textbox.
Daniel
"Florian" a écrit dans le message de news:

Désolé Daniel
cela plante où me lance le msgbox dès qu'un chiffre est saisi n'importe
quel chiffre
Flo riant

"Daniel" a écrit dans le message de news:

Essaie :

Dim Var As Double
Var = CDbl(UserForm1.TextBox1.Value) -
Int(CDbl(UserForm1.TextBox1.Value))
If Var <> 0 Then
MsgBox ("Erreur")
End If

Daniel
"Florian" a écrit dans le message de news:
%
Re Daniel et merci
Appliquer un message d'erreur
du genre "vous ne pouvez saisir que ,5 ou rien"
En fait c'est pour saisir des jours et ceux-ci ne peuvent qu'être
entier ou 1/2 donc ,5
Flo riant

"Daniel" a écrit dans le message de news:

Quelle règle appliquer ? Arrondi ? ou message d'erreur ?
Daniel
"Florian" a écrit dans le message de news:
OZ0h%
Bonsoir
J'ai sur un userform des textbox.
Je souhaite que l'utilisateur, ne puisse saisir qu'une sorte de
décimale ,5 ou pas de décimales
Merci pour votre aide
Flo riant