Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

FORMATAGE DE NOMBRE

5 réponses
Avatar
J'importe une base de donn=E9es dans excel avec une macro=20
commande.
mon probl=E8me est le formatage des nombres qui arrivent de=20
la fa=E7on suivante : 1,466.12=20
si je me sert de remplacer la virgule par "rien" puis=20
un "point" par une "vigule" ca marche mais j'aimerais=20
cr=E9er une macro commande pour me faciliter le travail mais=20
ca ne marche pas car le remplacement ce fait mais excel ne=20
le consid=E8re pas comme du chiffre puisque les nombres=20
reste =E0 gauche une formater
merci d'apporter une solution =E0 mon probl=E8me

5 réponses

Avatar
Philippe.R
Bonsoir,

Essaie ce code, dans un module standard, avec la plage nommée plage

Sub change_format()
'MPFE Philippe.R 18/10/2003

For Each c In Range("plage")

c.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:úlse, SearchFormat:úlse, _
ReplaceFormat:úlse
c.Replace What:=",", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:úlse, SearchFormat:úlse, _
ReplaceFormat:úlse
c.Value = c.Value / 100
Next c
End Sub

--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

a écrit dans le message de
news:012501c395bd$8324f220$
J'importe une base de données dans excel avec une macro
commande.
mon problème est le formatage des nombres qui arrivent de
la façon suivante : 1,466.12
si je me sert de remplacer la virgule par "rien" puis
un "point" par une "vigule" ca marche mais j'aimerais
créer une macro commande pour me faciliter le travail mais
ca ne marche pas car le remplacement ce fait mais excel ne
le considère pas comme du chiffre puisque les nombres
reste à gauche une formater
merci d'apporter une solution à mon problème
Avatar
FxM
Bonsoir,

Après tes remplacements, multiplie ce que tu obtiens par 1 et Excel
devrait le considérer comme des nombres.
Tu peux aussi modifier tes paramètres régionaux pour directement
comprendre les nombres en format américain.

@+
FxM



wrote:

J'importe une base de données dans excel avec une macro
commande.
mon problème est le formatage des nombres qui arrivent de
la façon suivante : 1,466.12
si je me sert de remplacer la virgule par "rien" puis
un "point" par une "vigule" ca marche mais j'aimerais
créer une macro commande pour me faciliter le travail mais
ca ne marche pas car le remplacement ce fait mais excel ne
le considère pas comme du chiffre puisque les nombres
reste à gauche une formater
merci d'apporter une solution à mon problème


Avatar
ru-th
Salut

tu peux tester
Sub TEST()
For Each c In Selection
c.Value = Application.Substitute(c.Value, ",", "")
c.Value = Application.Substitute(c.Value, ".", ",") * 1
Next
End Sub


--
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

a écrit dans le message de news:
012501c395bd$8324f220$
J'importe une base de données dans excel avec une macro
commande.
mon problème est le formatage des nombres qui arrivent de
la façon suivante : 1,466.12
si je me sert de remplacer la virgule par "rien" puis
un "point" par une "vigule" ca marche mais j'aimerais
créer une macro commande pour me faciliter le travail mais
ca ne marche pas car le remplacement ce fait mais excel ne
le considère pas comme du chiffre puisque les nombres
reste à gauche une formater
merci d'apporter une solution à mon problème
Avatar
bonsoir merci pour ta réponse mais le code se termine en
erreur (j'ai nommé ma colonne "plage")
-----Message d'origine-----
Bonsoir,

Essaie ce code, dans un module standard, avec la plage
nommée plage


Sub change_format()
'MPFE Philippe.R 18/10/2003

For Each c In Range("plage")

c.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:úlse,
SearchFormat:úlse, _

ReplaceFormat:úlse
c.Replace What:=",", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:úlse,
SearchFormat:úlse, _

ReplaceFormat:úlse
c.Value = c.Value / 100
Next c
End Sub

--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

a écrit dans le
message de

news:012501c395bd$8324f220$
J'importe une base de données dans excel avec une macro
commande.
mon problème est le formatage des nombres qui arrivent de
la façon suivante : 1,466.12
si je me sert de remplacer la virgule par "rien" puis
un "point" par une "vigule" ca marche mais j'aimerais
créer une macro commande pour me faciliter le travail mais
ca ne marche pas car le remplacement ce fait mais excel ne
le considère pas comme du chiffre puisque les nombres
reste à gauche une formater
merci d'apporter une solution à mon problème


.



Avatar
Philippe.R
Re,
Attention, n'utilise pas les doubles quottes dans le nom ; tu dois nommer ta colonne : plage

quel message d'erreur ?
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

a écrit dans le message de
news:024401c395c2$60802230$
bonsoir merci pour ta réponse mais le code se termine en
erreur (j'ai nommé ma colonne "plage")
-----Message d'origine-----
Bonsoir,

Essaie ce code, dans un module standard, avec la plage
nommée plage


Sub change_format()
'MPFE Philippe.R 18/10/2003

For Each c In Range("plage")

c.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:úlse,
SearchFormat:úlse, _

ReplaceFormat:úlse
c.Replace What:=",", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:úlse,
SearchFormat:úlse, _

ReplaceFormat:úlse
c.Value = c.Value / 100
Next c
End Sub

--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

a écrit dans le
message de

news:012501c395bd$8324f220$
J'importe une base de données dans excel avec une macro
commande.
mon problème est le formatage des nombres qui arrivent de
la façon suivante : 1,466.12
si je me sert de remplacer la virgule par "rien" puis
un "point" par une "vigule" ca marche mais j'aimerais
créer une macro commande pour me faciliter le travail mais
ca ne marche pas car le remplacement ce fait mais excel ne
le considère pas comme du chiffre puisque les nombres
reste à gauche une formater
merci d'apporter une solution à mon problème


.