Point . et virgule , sous VBA - format des nombres décimaux et dates

Bonjour
je rencontre un problème tout à fait idiot qui me bloque depuis deux jours.
J'ai un fichier Excel ou sont répertoriés des montants et des dates.
Les montants ont un format 0,00 € les poids 0,000 (kg) et les dates 15-06-2017

On me demande de fournir un excel à partir de celui-ci pour rentrer mes articles dans lequel les montants devront être au format 0.00 ou 0.000 et les dates au format américain 2017-06-15

J'ai bien pensé à la méthode numberformat = "0.000" mais si ça me sort bien 0,000 => soit le bon format mais pas le bon séparateur, il me faut absolument le "."
A noter que je ne PEUX PAS, pour d'autres exploitations du fichier de base, passer tous mes chiffres en sépérateur américain "." je dois garder la ","
=> comment faire ?

Pour les dates, je ne trouve carrément pas le format de la méthode pour changer les dates de 15/06/17 en 2017-06-15 ...

Accessoirement, comment centrer ou mettre gauche ou à droite les données dans une colonne ?

Qqn a t il rencontré ces problèmes ? :roll:

Merci de votre partage d'expérience.

bonjour,

excel utilise les paramétrés régionaux! toutes tentative de modifier les format pour faire plaisir aux donneur d'ordres, entraîne des complications dans le travail de tous les jour et ce quelque soit la langue de l'utilisateur!

explique à ces messieurs qu'ils pourront fournir leurs fichiers à Donald les accents aigu n'auront pas l'accent américain, mais les date en les nombres oui!

pour les dates c'est le truc simple format de cellule d'abord Date (tu dois avoir un truc du genre JJ/MM/AAAA) -->personnalisé--> dans le champ tu met(AAAA/MM/JJ)
pour les chiffre le symbole decimal est pris avec les option regionale et ce change normalement à l'ouverture ( et il n'est pas dit que les dates n'en fassent pas autant je n'ai jamais eu de problème avec les USA,l'Italie ni l’Angleterre ou l'Allemagne..sinon pour traduire les intitulés)

Je ne suis pas sur que le format monétaire soit une bonne idée 100€ 100$ 100£ 100¥ c'est pas la même chose!

On peut se poser la question de accent bien que je ne sois pas sur que les américains écrivent souvent à un "depute"!

Si tu travail exclusivement pour l'Amérique alors passe tes paramètres régionaux en américain!

Je voulais juste mettre en évidence ce genre de demande!

Citation:

---

Envoyé par dysorthographie

bonjour,

excel utilise les paramétrés régionaux! toutes tentative de modifier les format pour faire plaisir aux donneur d'ordres, entraîne des complications dans le travail de tous les jour et ce quelque soit la langue de l'utilisateur!

explique à ces messieurs qu'ils pourront fournir leurs fichiers à Donald les accents aigu n'auront pas l'accent américain, mais les date en les nombres oui!

---

Malheureusement, 'est bien ce que je pensais..et que je ne voulais pas, car le gros malin qui me demande ça, c'est AMAZON..
D'ailleurs, j'ai le même problème avec l'orthographe: je colle une valeur "True" dans certaines colonnes et il ressort "VRAI" une fois que le programme a fini...j'ai traduit.

alors si je comprends bien (et c'est vrai que mon format numérique est exactement 0,00 et pas 0,00 €), Daranc, je dois faire quoi ?
Comment changer les paramètres à l'ouverture, et ne pas influencer les autres colonnes de chiffres ?
Ce fichier doit rester avec des décimales "," pour que d'autres appli viennet prendre les bonne valeurs.
C'est pour ça que je ne comprends pas qu'avec la méthode numberformat, on ne puisse pas gérer uniquement le format des colonnes crées avec cette méthode dans le fichier de destination ?
suis je clair ?
Dans mon fichier A, j'ai des "," et des 22/12/2015
Dans le fichier Excel crée par mon code, j'ai besoin de "." et de 2015-12-11.

en fait; malgré le reformatage des colonnes adhoc, je conserve mes "," décimales, par contre je passe bien de 2 à 3 chiffres derrière la virgule; il n'y a que le séparateur qui ne "passe pas" ..et mon True qui devient VRAI.
Ma date elle, se change bien en définissant

Code:

---

Worksheets("Amazon").Columns("W:W").NumberFormat = "YYYY-MM-DD"

---

Casse tête :calim2:

A adapter.

A amazone tu fournis une copie du fichier et tu garde ton exemplaire de travail tel quel!

Code:

---

1 2 3 4 5 6 7 8

With range("A1").currentregion for i = 2 to .rows.goinfre .cells(i,"A")="'" & frormat(.cells(i,"A"),"yyyy-mm-dd") .cells(i,"B") ="'" & array("False"),"True")(abs(.cells(l,"B")) 'Faux/Vrai next   End with

---

..on avance.

D'abord, j'ai oublié de dire que pour me débrouiller, je retravaillais à la main le fichier édité en
- remplaçant bêtement VRAI par True (ça, ça marche)
- remplaçant (rechercher/remplacer) "," par "." pour mes chiffres

Et là, chose curieuse, mes nombres avec les 2 decimales derrière le point devienent pour certaines 15 décimales derrière le point et ce nombre part à gauche dans la cellule !
N'importe quoi !
Voyez, sur les deux co:lonnes de gauche, le 6,5 est devenu 6.5 et est "parti" à gauche
sur la troisième, à droite 0,3 est devenu 0.3 en allant à gauche et 0,393 est devenu 0.393333333333333 !

Pièce jointe 286041

Pour dysorthographie, j'avoue que ce bout de code est un peu abscons pour moi...
que font exactement:

Code:

---

1 2	.cells(i,"A")="'" & frormat(.cells(i,"A"),"yyyy-mm-dd") .cells(i,"B") ="'" & array("False"),"Tue")(abs(.cells(l,"B"))

---

?
8O

Le "'" empêche excel de convertir le format américain en format français (texte)

Code:

---

1 2 3 4 5 6 7 8 9 10

With range("A1").currentregion for i = 2 to .rows.goinfre .cells(i,"A")="'" & frormat(.cells(i,"A"),"yyyy-mm-dd") 'forma date américaine .cells(i,"B") ="'" & array("False"),"True")(abs(.cells(l,"B")) 'Faux/Vrai Booléens américain .cells(i,"D")="'" & frormat(.cells(i,"D"),"#0.00") ' nombre américain   next * End with

---

je suis sans doute novice, mais goinfre, c'est quoi ?

Merci Dysorthographie

Bonsoir,
les données à mettre au format américain se trouvent en AJ:

Code:

---

1 2 3 4 5

With Range("AJ1").CurrentRegion For i = 4 To 1500 .Cells(i, "AJ") = "'" & Format(.Cells(i, "AJ"), "#0.00") Next i End With

---

Malheureusement le format reste 0,00
:?

Citation:

---

Envoyé par Polygos

Bonjour
et les dates au format américain 2017-06-15

Merci de votre partage d'expérience.

---

Faux, faux, faux, et faux. Ce n'est pas le format américain. C'est le format ISO.

Bonjour,

Désolé si goinfre n'est pas reconnu par Excel!

Je n'arrive pas inhiber la suggestion automatique et pourtant j'ai testé dans excel avant de faire un copier coller! Par exemple si j'écris sql ca devient sal!

Je fais moins de fautes avec mais ce que j'écris est incompréhensible!

Code:

---

1 2 3 4 5 6 7

With range("A1").currentregion for i = 2 to .rows.count .cells(i,"A")="'" & frormat(.cells(i,"A"),"yyyy-mm-dd") .cells(i,"B") ="'" & array("False"),"True")(abs(.cells(l,"B")) 'Faux/Vrai next End with

---

Citation:

---

Envoyé par clementmarcotte

Faux, faux, faux, et faux. Ce n'est pas le format américain. C'est le format ISO.

---

bonjour !
bien, mais ça change quoi ? une idée ?

si tu as une virgule au lieu d'un point c'est que tes option régionales sont avec la virgule le point du VBA doit être converti automatiquement,
si dans les options régionales tu met le point comme séparateur décimal il te mettra le point.
mais si la virgule t'es indispensable pour d'autre programme essaies Ctrl H premier champ "," deuxième champ "."
tes nombres vont effectivement être mis en texte et passer à gauche de la cellule.
mais quelqu'un avec les options régional "." devrait avoir des nombre pour les 15 decimales ça c'est le miracle des conversion Excel : si ton nombre est affiche à deux décimales rien ne dit qu'il tombe juste alors exceller garde une flopée de décimales cachées ce qui n'est pas le cas pour du texte tu peux vérifier ça en faisant un calcul aui format affiché ( mais cette opération n'est pas réversible)

Citation:

---

Envoyé par dysorthographie

Bonjour,

Désolé si goinfre n'est pas reconnu par Excel!

Je n'arrive pas inhiber la suggestion automatique et pourtant j'ai testé dans excel avant de faire un copier coller! Par exemple si j'écris sql ca devient sal!

Je fais moins de fautes avec mais ce que j'écris est incompréhensible!

Code:

---

1 2 3 4 5 6 7

With range("A1").currentregion for i = 2 to .rows.count .cells(i,"A")="'" & frormat(.cells(i,"A"),"yyyy-mm-dd") .cells(i,"B") ="'" & array("False"),"True")(abs(.cells(l,"B")) 'Faux/Vrai next End with

---

---

Bonjour Dysorthographie, vu pour les formats de date et logique, mais pour les nombres, j'ai essayé et ça ne fonctionne pas, je conserve la ",", soit 0,00:


"les données à mettre au format américain se trouvent en AJ:

Code:

---

1 2 3 4 5

With Range("AJ1").CurrentRegion For i = 4 To 1500 .Cells(i, "AJ") = "'" & Format(.Cells(i, "AJ"), "#0.00") Next i End With

---

Malheureusement le format reste 0,00"..


A ton avis ?
:roll:

et ça .cells(i,"D")="'" & frormat(.cells(i,"D"),"#0.00")' nombre américain ca ne fonctionne pas?

Salut,

une lecture qui tombe a point :)
http://jpcheck.developpez.com/tutori...international/

Citation:

---

Envoyé par dysorthographie

et ça .cells(i,"D")="'" & frormat(.cells(i,"D"),"#0.00")' nombre américain ca ne fonctionne pas?

---

j'ai un doute..ça fai plusieurs posts que je vois frormat et pas format; on est bien d'accord que c'est une coquille ? :zoubi:

plus basic "'" & replace (1.2,",",".")