J'aimerais modifier en vb le format des cellules (changer=20
le point s=E9parateur par une virgule et diminuer =E0 2=20
chiffres =E0pr=E8s la virgule).
Pour le moment les donn=E9es d=E9cimales sont s=E9par=E9es par un=20
point et ont 5 chiffres apr=E8s la virgule (exemple: 2.56789)
ce qui ne permet pas d'effectuer des calculs. Si je=20
remplace en vb le . par une , il supprime le . et=20
m'affiche des nombres entiers (2.56 devient 256789)
J'utilise la ligne suivante :
Selection.Replace What:=3D".", Replacement:=3D",",=20
LookAt:=3DxlPart, SearchOrder:=3DxlByRows
De plus pour mettre au format numerique avec 2 chiffres apres la virgule:
Range("A1:A10").NumberFormat = "0.00" si la plage de donnée est située sur A1:A10
Mais je pense que si tu ne peux pas effectuer de calcul après conversion c'est simplement parce que ton excel a pour parametre regionale "." (version US) au lieu de "," (version EU) et considère donc ta valeur comme du texte. Il faut modifier ce paramètre dans les options.
-----Message d'origine----- Bonjour,
J'aimerais modifier en vb le format des cellules (changer
le point séparateur par une virgule et diminuer à 2 chiffres àprès la virgule). Pour le moment les données décimales sont séparées par un
point et ont 5 chiffres après la virgule (exemple: 2.56789)
ce qui ne permet pas d'effectuer des calculs. Si je remplace en vb le . par une , il supprime le . et m'affiche des nombres entiers (2.56 devient 256789) J'utilise la ligne suivante : Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, SearchOrder:=xlByRows
Merci pour votre aide .
Voici un code plus leger est plus rapide (a l'execution)
facile a integrer dans une boucle pour remplacer un
caractere:
De plus pour mettre au format numerique avec 2 chiffres
apres la virgule:
Range("A1:A10").NumberFormat = "0.00"
si la plage de donnée est située sur A1:A10
Mais je pense que si tu ne peux pas effectuer de calcul
après conversion c'est simplement parce que ton excel a
pour parametre regionale "." (version US) au lieu de ","
(version EU) et considère donc ta valeur comme du texte.
Il faut modifier ce paramètre dans les options.
-----Message d'origine-----
Bonjour,
J'aimerais modifier en vb le format des cellules
(changer
le point séparateur par une virgule et diminuer à 2
chiffres àprès la virgule).
Pour le moment les données décimales sont séparées par
un
point et ont 5 chiffres après la virgule (exemple:
2.56789)
ce qui ne permet pas d'effectuer des calculs. Si je
remplace en vb le . par une , il supprime le . et
m'affiche des nombres entiers (2.56 devient 256789)
J'utilise la ligne suivante :
Selection.Replace What:=".", Replacement:=",",
LookAt:=xlPart, SearchOrder:=xlByRows
De plus pour mettre au format numerique avec 2 chiffres apres la virgule:
Range("A1:A10").NumberFormat = "0.00" si la plage de donnée est située sur A1:A10
Mais je pense que si tu ne peux pas effectuer de calcul après conversion c'est simplement parce que ton excel a pour parametre regionale "." (version US) au lieu de "," (version EU) et considère donc ta valeur comme du texte. Il faut modifier ce paramètre dans les options.
-----Message d'origine----- Bonjour,
J'aimerais modifier en vb le format des cellules (changer
le point séparateur par une virgule et diminuer à 2 chiffres àprès la virgule). Pour le moment les données décimales sont séparées par un
point et ont 5 chiffres après la virgule (exemple: 2.56789)
ce qui ne permet pas d'effectuer des calculs. Si je remplace en vb le . par une , il supprime le . et m'affiche des nombres entiers (2.56 devient 256789) J'utilise la ligne suivante : Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, SearchOrder:=xlByRows
