Conversion

[piep14]

Bonsoir, impossible de trouver la méthode pour remplacer une valeur décimal avec un point en une valeur décimal avec une virgule.
Exemple : 1.5 --> 1,5

Merci vraiment de toute votre aide

 

[Gérard DEZAMIS]

Bonsoir Piep

Selectionner les valeurs
Edition, Remplacer '.' par ','

Serait-ce suffisant ?

@+ GD

 

[piep14]

Nan, ca ne veut pas car il n'analyse pas les valeurs mais plutot les formules j'ai l'impression !!!

Merci de votre aide

 

[alcalzone]

Moi je fais en passant dans le panneau de configuration de windows, option régionale, personnaliser
Là, on peut modifier le séparateur décimal

En espérant que c'est ce que tu cherches

 

[alcalzone]

Moi je fais en passant dans le panneau de configuration de windows, option régionale, personnaliser
Là, on peut modifier le séparateur décimal

En espérant que c'est ce que tu cherches

 

[didique]

Bonsoir,

Pour compléter la réponse de Gérard, tu peux aussi modifier cela en ouvrant panneau de configuration,
options régionales,
personnaliser,
nombres,
symbole décimal et là tu choisis !

Voilà, je me souvenais aussi avoir beaucoup cherché à une époque ... et appris ça ici d'ailleurs !

Tchao !
:silly:

Arf ... désolée ALcazone je ne t'avais pas vu arriver !
Je dois taper bien lentement .... 😉

Message édité par: didique, à: 15/01/2006 19:48

 

[piep14]

Nan, j'ai deja changé dans les options du panneau de configuration et dans les options de Excel. C'est pourquoi je me demande si ce n'est pas possible avec une macro ou un trucs dans le style !

Merci a vous tous

 

[myDearFriend!]

Bonsoir tout le monde,

Sinon, par macro, tu pourrais peut-être essayer avec cette procédure :

Sub Traitement()
Dim Cellule As Range
      For Each Cellule In ActiveSheet.UsedRange.Cells
            Cellule.Value = Val(Cellule.Value)
      Next Cellule
End Sub

J'ajoute que depuis XL2003, il est possible de modifier le séparateur décimal (point/virgule) directement dans les options d'Excel...

Cordialement,

 

[piep14]

ca fonctionne des lors que les valeurs des cellules ne sont issues de formules !!! Sinon ca ne transforme pas en valeurs décimal avec une virgule

Merci

 

[didique]

re bonsoir,

Didier, j'ai la version 2003, mais je ne vois pas où il est possible de faire cela directement ...
Le tuyau m'intéresse donc ! 😉


A+

Bises

 

[piep14]

Mi j'ai deja fait la modif mais ca n'apporte rien.

 

[piep14]

Il n'y aurait pas moyen de récupérer la valeur de la cellule (pas la formule). De récupérer ensuite la partie a gauche du point puis celle a droite du point puis enfin faire une concaténation avec une virgule entre les deux ? Je suis pas trop doué pour m'embarquer la dedans ? Est ce une idée faisable ??? Merci

 

[myDearFriend!]

Re le fil,

Désolé piep14, pour ma part, je n'ai pas d'autres solutions à te soumettre que celle que j'ai mise un peu plus haut... et je suppose que si tu pouvais Lien supprimé (épuré des données inutiles ou confidentielles bien-sûr), on y verrait certainement plus clair...

Pour Didique -----> Lien supprimé.

Cordialement,

 

[piep14]

Sans probleme, voici le fichier, les données a modifier se trouve sur l'onglet CONCURRENCE !!

Merci sincèrement de votre aide [file name=concurrence_20060115212403.zip size=45085]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/concurrence_20060115212403.zip[/file]

 

[myDearFriend!]

Re piep14,

Tu trouveras ci-joint ton classeur modifié avec une tentative de réponse à ton problème.
J'y ai ajouté un module de code 'TraitementConv' contenant une seule et unique procédure qu'il convient de lancer manuellement :

Sub Conversion()
Dim F As Worksheet
Dim Cellule As Range
      For Each F In Worksheets
            For Each Cellule In F.UsedRange.Cells
                  If Not Cellule.HasFormula And Cellule.Value Like '*.*' Then
                        Cellule.Value = Val(Cellule.Value)
                  End If
            Next Cellule
      Next F
End Sub

En espèrant que ça puisse t'être utile...

Cordialement, [file name=CONCURRENCE.zip size=27411]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/CONCURRENCE.zip[/file]