Enlever le G à 530G

[Stéphane]

Bonjour à tous,

Si en A1=539G, je voudrais afficher en B1=539 et enlever ce G qui me pose problème dans mes formules.

Bref y-a-til un moyen d'enlever du texte si le résultat de la cellule est une combinaison "nombre-texte".

Merci pour votre aide.

Stéphane.

 

[imanuelga]

Bonjour Stéphane,

dans un premier temps, si le nombre maximum de lettre à la fin de la cellule est toujours de 1, tu peux essayer cette formule

=SI(ESTERREUR(CNUM(A539));CNUM(GAUCHE(A539;NBCAR(A539)-1));A1)

si non soit tu imbriques des si les uns dans les autres ... Soit il faudra autre chose...

Salut,
Imanuelga

 

[Willy]

Bonjour

=STXT(A2;1;3)

dans le cas ou la lettre a enlever est toujour en position 3

 

[Stéphane]

Merci à Imanuelga et Willy pour leur réponse, je creuse en direction de vos réponses ......

 

[Sylvain]

bonjour,


une autre solution est de ne pas mettre de lettre dans la cellule. Par exemple s'il doit toujours y avoir G à la suite des valeurs on utilise le format :
a un format cellule
nombre
personnalisé
et on choisit
0"G"

ce qui fait que dans la cellule on verra 539G, mais la valeur contenue dans la cellule sera uniquement 539.

on peut faire de même avec une date (toujours format / nombre / personnalisé) :
"Paris le "j" "mmmm" "aaaa
permet d'afficher

Paris le 18 décembre 2004
alors qu'on vient de saisir la date dans la cellule (Ctrl pour aller plus vite.
Et ainsi on peut faire un test sur la valeur de la date sans utiliser les fonctions texte.

A+

 

[@+Thierry]

Bonjour Stéphane, Sylvain, Willy, le Forum

Une autre approche par VBA...

Si Stéphane n'a que des lettres situées à la droite d'un nombre et que celui-ci ne contient pas de décimale avec un séparateur "," alors une mini macro comme ceci peut lui remplir sa colonne "B" sans problème

Sub ValOnString()
Dim Plage As Range, Cell As Range

Set Plage = Range("A1:A50")
   For Each Cell In Plage
      Cell.Offset(0, 1) = Val(Cell)
   Next
End Sub

Bon Samedi
@+Thierry