VBA : Problème de récupération de valeur exacte

Version imprimable

12/07/2017, 11h54
aurelu

VBA : Problème de récupération de valeur exacte

Bonjour à tous,

Je sollicites votre aide car j'ai un petit soucis concernant la récupération d'une valeur d'une textbox dans une cellule excel.

Je m'explique :

Dans un userform je rentre plusieurs informations me permettant de calculer un nombre de personne dans une textbox. Lorsque je clique sur un bouton afin de pouvoir l'inscrire dans la cellule adéquate le résultat est le suivant :

Si j'ai un nombre de 1 ou 2 ou 3 etc.. personnes la valeur retranscrite dans la cellule sera bien 1, 2, 3 etc...
Cependant si j'ai un nombre de 1,5 ou 2,5 personnes la valeur retranscrite dans la cellule sera respectivement 1 ou 2.

Les décimales ne s'affichent pas alors que mes cellules sont en format nombre avec 1 décimale.

Voici le code qui inscrit ma valeur :

Code:

Cells(Ligne, Col).Value = Val(Me.TextBox52)

Merci à tous ceux qui tenteront de m'aider !
12/07/2017, 13h16
Invité

Bonjour,

Voir au niveau de la déclaration des variables s'elles sont en INTEGER si Oui les mettre en DOUBLE;)
12/07/2017, 13h22
Igloobel

Citation:

Envoyé par aurelu

Bonjour à tous,

Je sollicites votre aide car j'ai un petit soucis concernant la récupération d'une valeur d'une textbox dans une cellule excel.

Je m'explique :

Dans un userform je rentre plusieurs informations me permettant de calculer un nombre de personne dans une textbox. Lorsque je clique sur un bouton afin de pouvoir l'inscrire dans la cellule adéquate le résultat est le suivant :

Si j'ai un nombre de 1 ou 2 ou 3 etc.. personnes la valeur retranscrite dans la cellule sera bien 1, 2, 3 etc...
Cependant si j'ai un nombre de 1,5 ou 2,5 personnes la valeur retranscrite dans la cellule sera respectivement 1 ou 2.

Les décimales ne s'affichent pas alors que mes cellules sont en format nombre avec 1 décimale.

Voici le code qui inscrit ma valeur :

Code:

Cells(Ligne, Col).Value = Val(Me.TextBox52)

Merci à tous ceux qui tenteront de m'aider !

tiré de l'aide en ligne :f1: sur l'instruction Val

Citation:

Note La fonction Val ne reconnaît que le point comme séparateur décimal (.). Lors de l'utilisation d'autres séparateurs décimaux (applications internationales, par exemple), convertissez la chaîne en nombre à l'aide de la fonction CDbl.