le point le zéro et l'infini

[sanpierro]

Bonjour à tous,

Je fais des tableaux de classement des grandes entreprises comme par exemple xx,xxx.x
Leur profit peut être négatif -xx.x où -x,xxx.x
Je cherche à supprimer le point et le chiffre suivant pour obtenir
xx,xxx
Mais si je demande 3 chiffres -xx.x devient -xxx donc multiplié dans la liste. D'autres n'ont pas de pb.

Merci par avance. JP

 

[MECEQI]

Re : le point le zéro et l'infini

Bonjour, bonjour,
un " truc sympa ? "

 Range("A1").Formula = "1,234,567.89"
   

       Application.DecimalSeparator = "-"
    Application.ThousandsSeparator = "-"
    Application.UseSystemSeparators = False

End Sub

 

[MECEQI]

Re : le point le zéro et l'infini

Pardon ,
Je me suis pris les pieds dans le tapis, (allé trop vite).
Amon avis, dit l'egyptien, Voir aussi sur les machines formats cellules identiques, sinon peut être la " forcer " au démarrage, et peut être vérifier les paramètres régionnaux.
A+ , si Dieu le veut, on ne sait jamais......

 

[sanpierro]

Re : le point le zéro et l'infini

Bonjour MECEQI,

Merci pour la réponse, j'ai tenté, j'ai pas réussi...
Je ne suis pas un habitué des fonctions.

A bientôt. JP

 

[Tibo]

Re : le point le zéro et l'infini

Bonjour,

Sans avoir vraiment compris ce que tu voulais faire, un essai par formule :

=GAUCHE(A1;TROUVE(".";A1)-1)*1

Si pas ça, reviens avec un extrait de ton fichier avec plusieurs exemples pour lesquels tu nous mets en exemple le résultat attendu.

@+

 

[sanpierro]

Re : le point le zéro et l'infini

Bonjour Tibo,

Voici un extrait :
International Assets Holding 18,359 27.8
Halliburton 18,279 1,538.0
Burlington Northern Santa Fe 18,018 2,115.0
Union Pacific 17,970 2,338.0
Avnet 17,953 499.1
Capital One Financial 17,869 -46.0
Freeport-McMoRan Copper & Gold 17,796 -11,067.0
Xerox 17,608 230.0
Illinois Tool Works 17,218 1,519.0

Pour la première colonne je suis allé dans rechercher et sélectionner pour supprimer le point et le chiffre à la suite.
Pour la seconde, c'est le cirque !

A bientôt. JP

 

[Tibo]

Re : le point le zéro et l'infini

re,

Pour nous aider à t'aider, c'est d'un fichier Excel dont nous avons besoin.

Joins nous ton fichier (au format Excel donc) en nous mettant manuellement le résultat attendu.

A te (re)lire avec ce petit bout de fichier

@+

 

[sanpierro]

Re : le point le zéro et l'infini

Re-Tibo,
j'ai enregistré mon fichier au format texte, c'est une copie reproduite par collage spécial texte unicode. En copie j'obtiens cette présentation :



871 T. Rowe Price 2,121 490.8 490.8
872 Iasis Healthcare 2,116 36.3 36.3
873 BE Aerospace 2,110 -99.4 -99.4
874 American Axle & Manufacturing 2,109 -1,224.3 -1,224.3
875 Warnaco Group 2,108 47.3 47.3
876 Varian Medical Systems 2,105 279.5 279.5
877 Cenveo 2,099 -298.0 -298.0
878 Guess 2,093 213.6 213.6
879 Sauer-Danfoss 2,091 -29.1 -29.1
880 Applied Industrial Technologies 2,090 95.5 95.5
881 Piedmont Natural Gas 2,089 110.0 110.0
882 Pacer International 2,088 -16.6 -16.6
883 Beazer Homes USA 2,078 -951.9 -951.9
884 AptarGroup 2,072 153.5 153.5
885 Paychex 2,066 576.1 576.1
886 ON Semiconductor 2,055 -380.1 -380.1
887 Maxim Integrated Products 2,053 317.7 317.7
888 Univision Communications 2,050 -5,127.3

Il s'agit de 2 chiffres par ligne, le second pose pb.
Mon souhait est d'obtenir par exemple pour la ligne 886 seulement - 380 et par exemple pour la ligne 874 le chiffre de -1,224

A demain (je dois partir, on ferme) JP

 

[Tibo]

Re : le point le zéro et l'infini

Bonjour,

Ce que je souhaite savoir, c'est comment se présente ton fichier quand tu l'ouvre avec Excel.

Les données sont-elles dans une seule colonne ? plusieurs ?

Si plusieurs, quel est le contenu de chacune de ces colonnes ?

Comme dit hier, c'est plus simple de travailler sur un vrai fichier Excel plutôt qu'une description de celui-ci.

A te (re)lire

@+

 

[sanpierro]

Re : le point le zéro et l'infini

Bonjour Tibo,

Voici une copie mise en 97.
De fait seule la seconde colonne pose pb.
Les chiffres sont différents en taille.
Je veux supprimer le point ainsi que le chiffre suivant sans modifer le reste.

A bientôt. JP

 

[Tibo]

Re : le point le zéro et l'infini

Bonjour,

Sur la base de ce que j'avais déjà proposé (sans être convaincu d'avoir compris) :

en E3 :

=GAUCHE(D3;TROUVE(".";D3)-1)

tu peux ajouter *1 à la fin pour donner un caractère numérique à ta valeur.

Si ton séparateur décimal est le point, une variante :

=SUBSTITUE(GAUCHE(D3;TROUVE(".";D3)-1);",";".")*1

Si pas ça, indique nous en clair le résultat que tu attends pour les 2 ou 3 premières lignes.

A te (re)lire

@+