problème décimal

13GIBE59

XLDnaute Accro

• 9 Novembre 2009

• #2

Re : problème décimal

Bonjour Eddy

Essaie plutôt :

Range("cellule").Value = Format(Zone de texte.Value, "0.00")

 

Vote positif 0 Vote négatif

E

eddy13t

Guest

• 9 Novembre 2009

• #3

Re : problème décimal

le pb est que si je met "0.00" excel me dit que la valeur stocké est du texte et quand je met "0,00" ben il me reconnait toujours pas le décimal il me met le nombre entier...

 

Vote positif 0 Vote négatif

13GIBE59

XLDnaute Accro

• 9 Novembre 2009

• #4

Re : problème décimal

Alors essaie :

Range("cellule").Value = Format(Zone de texte.Value, "0.00")*1

ou

Range("cellule").Value = Format((Zone de texte.Value)*1, "0.00")

L'un ou l'autre devrait marcher...enfin j'espère.

 

Vote positif 0 Vote négatif

E

eddy13t

Guest

• 9 Novembre 2009

• #5

Re : problème décimal

ça me met encore stocké sous forme de texte lol ^^ qielle connerie ce truc

 

Vote positif 0 Vote négatif

13GIBE59

XLDnaute Accro

• 9 Novembre 2009

• #6

Re : problème décimal

Lol, en effet...

Tu peux joindre ton fichier ?

 

Vote positif 0 Vote négatif

E

eddy13t

Guest

• 9 Novembre 2009

• #7

Re : problème décimal

le pb c ke le fichier est bcp trop lourd 49,9Ko c mm pas l'équivalent de l'image du userform ta pas une adresse mail ?

 

Vote positif 0 Vote négatif

13GIBE59

XLDnaute Accro

• 9 Novembre 2009

• #8

Re : problème décimal

Compresse le, ou par par cjoint.fr.

 

Vote positif 0 Vote négatif

E

eddy13t

Guest

• 9 Novembre 2009

• #9

Re : problème décimal

Voici le lien : http://cjoint.com/?ljsscAsTOc

Merci

 

Vote positif 0 Vote négatif

13GIBE59

XLDnaute Accro

• 9 Novembre 2009

• #10

Re : problème décimal

C'est bien, on avance...Où est la zone de texte qui coince ?

 

Vote positif 0 Vote négatif

E

eddy13t

Guest

• 9 Novembre 2009

• #11

Re : problème décimal

ben par exemple si tu met un décimale dans la zone "ct_km" ben kd tu clique sur OK ça va pas afficher le décimal dans excel et ça le problème en fet.
(Si tu utilise le fichier n'oublie pas de remplir la zone "appelation du transport" avant de cliquer sur ok dans le cas contraire ça te renverrai directement sur débogage)

 

Vote positif 0 Vote négatif

youky(BJ)

XLDnaute Barbatruc

• 9 Novembre 2009

• #12

Re : problème décimal

Bonjour 13GIBE59,eddit13t,
J'ai souvent bataillé avec ça alors voici
pour le textbox pour remplacer le point par la virgule et n'avoir droit qu'a des chiffres.

Code:

Private Sub TextBox6_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii
  Case 46 'Change le point en virgule
     KeyAscii = 44
  Case 44, 45, 48 To 57 'Autorise les touches 0 à 9 et moins
  Case Else
     KeyAscii = 0
End Select
End Sub

Un autre truc pour seulement remplacer le point en virgule
Feuil1.Cells(k, 3) = Replace(myu.stock.Value, ",", ".")
la 1ere solution est meilleur
A+

 

Vote positif 0 Vote négatif

13GIBE59

XLDnaute Accro

• 9 Novembre 2009

• #13

Re : problème décimal

Effectivement, c'est bizarre.

Essaie d'ajouter

Code:

Range("H15").Select
    Selection.NumberFormat = "#,##0.00 $"

avant tes lignes de code :

Range("C7") = num_camion
Range("D15") = Val(capac_vol)
Range("E15") = Val(capac_poid)
Range("F15") = Val(vit_moy)
Range("G15") = Val(ct_horaire)
Range("H15") = Val(ct_km)
Range("I15") = Val(nb_heuresup)
Range("J15") = Val(ct_heuresup)

 

Vote positif 0 Vote négatif

E

eddy13t

Guest

• 9 Novembre 2009

• #14

Re : problème décimal

ben merci bcp pour votre aide

 

Vote positif 0 Vote négatif

13GIBE59

XLDnaute Accro

• 9 Novembre 2009

• #15

Re : problème décimal

Bonjour JM 🙂

Eddy, ça serait sympa de nous dire si la solution de Jean-Marcel (que je ne connaissais pas, merci JM 😉) fonctionne...

 

Vote positif 0 Vote négatif