InputBox avec une entré à chiffres decimales

Bonjour à tous,

Pour mon premier post, je galère énormément car dans mon document j'ai mis un inputbox où l'entré sera à 6 decimales, hors quand j'utilise

Dim uni As Currency

uni = InputBox("UNITES D'ACHAT : ", "Unités")

Range("D8").Select

ActiveCell.Value = uni

à la sortie je me retrouve qu'avec 2 des 6 decimales tapés. C'est pas une question qu'elles soient cachés, en effet la chiffre s'arrondit à 2 dec.

Ex. je rentre 2,123456 et à la sortie il y a 2,120000.

Comment je declare le format dans l'inputBox??

Merci

Bonjour

Comme cela, il n'y pas besoin de passé par une variable

[D8] = InputBox("UNITES D'ACHAT : ", "Unités")

mais si tu veux absolument passé par une variable

Dim val As Variant
val = InputBox("UNITES D'ACHAT : ", "Unités")
[D8] = val

Fred

Rechercher des sujets similaires à "inputbox entre chiffres decimales"