Problème de séparateur

pierrejean

XLDnaute Barbatruc

• 6 Mai 2008

• #2

Re : Problème de séparateur

bonjour Pierwak

il faut utiliser la fonction Cdbl() pour transferer de l'Usf sur la feuille
Quelque chose du genre

Range("A1")=Cdbl(Textbox1)

 

Vote positif 0 Vote négatif

P

Pierwak

XLDnaute Occasionnel

• 6 Mai 2008

• #3

Re : Problème de séparateur

Salut Pierre Jean,
Effectivement ca marche mais lorsque je rouvre ma ligne avec un double click pour faire des modifs mon nombre apparait du coup avec un point et mon test de validation me jette pcq ce textbox doit etre numérique... C un peu une histoire de fou... a titre indicatif je joins le code de mon test de validation :

Code:

With .Txtrat
    If Not IsNumeric(.Value) And Not .Value = Empty Then
    MsgBox "CB2 Rate is a numeric field, please enter a number or leave empty", vbInformation
    controlnum = False
    Exit Function
    End If
    End With

Voila donc maintenant j'arrive a faire apparaitre un virgule meme si l'utilisateur rentre un point, a bien stocker cette valeur au format nombre mais en cas de réouverture, la fonction ci dessus me dit que le nombre n'est pas un nombre car il s'affiche alors avec un "." ds l'usf alors qu'il s'affiche comme un nombre et avec une "," directement sous Excel... J'y comprend plus gd chose...

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 6 Mai 2008

• #4

Re : Problème de séparateur

Bonjour à tous,

tout ce que je peux proposer, c'est :
Txtrat.Text = Replace(Range("a1").Value, ".", ",")

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 6 Mai 2008

• #5

Re : Problème de séparateur

Re

Le textbox ne peut pas etre numerique par definition
La macro de verification doit donc aussi comprendre la fonction Cdbl() et en fait verifier que Cdbl(.Value) n'aboutit pas a une erreur
Il serait plus simple d'avoir un fichier exemple pour expliciter tout cela

 

Vote positif 0 Vote négatif

P

Pierwak

XLDnaute Occasionnel

• 6 Mai 2008

• #6

Re : Problème de séparateur

Merci a tous, avec le Cdbl dans la fonction de validation ET dans la fonction d'écriture dans la base le pb est résolu... Encore merci à XLD... One more time...

edit : en fait le CDbl dans la fonction de validation fait bugger le programme mais il suffit d'ouvrir la ligne avec le replace proposé et ca marche...

 

Dernière édition: 6 Mai 2008

Vote positif 0 Vote négatif

P

Pierwak

XLDnaute Occasionnel

• 16 Mai 2008

• #7

Re : Problème de séparateur

Me revoila, en fait il y a un autre bug, provenant des paramètres régionaux... je m'explique : sur un PC configuré avec le "." comme séparateur, la fonction de Thierry que je donne dans mon premier post fait que le nombre s'écrit avec un "." dans la case du usf. Seulement lors du test pour vérifier que l'on a bien rentré un nombre dans la textbox, cela ne marche pas, la fonction IsNumeric semble ne pas reconnaitre "1.35" comme un nombre. Et un Cdbl(.value) ne marche pas, on obtient systématiquement une erreur... Comment faire ?? Si quelqun a une idée miracle, faites tourner...

 

Vote positif 0 Vote négatif

P

Pyrof

XLDnaute Occasionnel

• 16 Mai 2008

• #8

Re : Problème de séparateur

Bonjour,


essais cells(x,y)=0 + val(textbox) ,j'ai parfois résolu comme ça

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 16 Mai 2008

• #9

Re : Problème de séparateur

Bonjour à tous,

Moi je suis passé en américain et isnumeric marche bien et cdbl aussi sur les nombres tapés avec un point.

 

Vote positif 0 Vote négatif

P

Pierwak

XLDnaute Occasionnel

• 16 Mai 2008

• #10

Re : Problème de séparateur

merci du tip mais le problème que je rencontre actuellement n'est pas de stocker le nombre en nombre dans la feuille mais de vérifier que c'est un nombre lorsque je quite l'userform...

je joins un fichier qui montre sur un petit example le problème rencontré. Essayer de tester avec la "," ET le "." dans les paramètres (outils->options->international->separateur décimal) il faudrait que ca marche dans les deux cas...
Regarde la pièce jointe demosepPwak.xls

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 16 Mai 2008

• #11

Re : Problème de séparateur

Bon, on peut toujours chipoter mais :
Si dans Excel, on garde les séparateurs système et qu'on passe de français à américain dans le panneau de configuration, chez moi, ça marche dans les 2 cas.
Là où ça se corse, c'est quand on est en Français dans le système et en Américain dans Excel ou inversement...

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 16 Mai 2008

• #12

Re : Problème de séparateur

Re

Vois si tu peux t'inspirer de ceci

Edit:

Salut pyrof
Salut tototiti

 

Pièces jointes

• pierwak.zip

  10 KB · Affichages: 76

Vote positif 0 Vote négatif

P

Pierwak

XLDnaute Occasionnel

• 16 Mai 2008

• #13

Re : Problème de séparateur

Salut tototiti je vais essayer en changeant dans le panneau de config mais le problème c'est que mon appli va etre utilisée dans plusieurs pays dont les US et que je peux difficilement prévoir quels seront leur settings. Ce matin mon manager qui est français ds le panneau de config et en US dans Excel a rencontré un problème et j'aimerais trouver une solution pour que ce genre de bug n'apparaisse plus...

Pierrejean merci mais je ne vois pas ou est la solution dans ton fichier... moi j'ai toujours la meme erreur que dans le mien en étant volontairement en , ds le panno de config et en . dans excel... So ??

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 16 Mai 2008

• #14

Re : Problème de séparateur

Une piste :
GESTION DES PARAMÈTRES RÉGIONNAUX paramètres, régionnaux, Source N°36929
pour obtenir le séparateur système
et
Application.DecimalSeparator
pour obtenir le séparateur Excel
Après ça, c'est du cas par cas...😱

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 16 Mai 2008

• #15

Re : Problème de séparateur

Re

Que veux-tu dire par
Etant en . dans Excel ???
L'erreur intervient sur quelle ligne ???

 

Vote positif 0 Vote négatif