Passer le résultat d'une fonction en texte

Résolu
0548 Messages postés 81 Statut Membre -  
0548 Messages postés 81 Statut Membre -
Bonjour,
j'ai utilisé la fonction TRIM("text") ; [dans mon cas TRIM(B1)..TRIM(B1775)] et qui est équivalente à SUPPRESPACE("text") en français .
Cette fonction permet d'éliminer les espaces. j'ai eu le résultat ce que je voulais Mais le problème est que lorsque j'ai voulu passé ce résultat en valeur (en texte) en faisant [ctr c ; ctr v puis clique droit puis j'ai appuyé sur '123'] j'ai eu le résultat initial ==> c'est à dire les espaces n'ont pas disparu .
Alors pouvez vous m'aidez à résoudre mon problème et Merci d'avance.
A voir également:

1 réponse

Frenchie83 Messages postés 2254 Statut Membre 339
 
Bonjour
il y a de fortes chances que l'espace n'en soit pas un, mais plutôt un espace insécable
remplacer TRIM("text") par
[B1] = Replace([B1], Chr(160), "")
essayez
Cdlt
2
0548 Messages postés 81 Statut Membre
 
Rebonjour;
Oui c'est vrai , ce n'est pas un espace mais lorsque j'ai voulu mettre votre méthode ; j'ai eu un message d'erreur la raison est que la fonction REPLACE() me demande la position de cet espace insécable comme vous l'avez mentionné et j'ai pas une positon fixe ; ni les mémes caractéres qui les précèdes pour faire (search("text";B1)+1);
Voici le fichier sur le quel je travail dans le cas ou j'étais pas clair dans ma question:
https://www.cjoint.com/c/EGrglgrYfGs
Merci.
0
Vaucluse Messages postés 27336 Statut Contributeur 6 441
 
Bonjour
Par formule pour supprimer un caractère insécable, vous pouvez utiliser SUBSTITUTE(anglais) qui ne demande pas de position, mais les supprime tous:
=SUBSTITUTE(cellule;car(160);"")
à toutes fins utiles pour supprimer des espaces insécables en colonne B:
sélectionner une cellule qui en contient un, le copier dans le texte affiché dans la barre de formule
sélectionner la colonne B
touche ctrl et h
remplacer: coller le caractère copié
par ne rien mettre
et remplacer tout
crdlmnt
0
Frenchie83 Messages postés 2254 Statut Membre 339
 
Bonjour à tous
En fait, ce ne sont pas des espaces (insécables ou pas), mais plutôt, les retours chariot ou des espaces, que vous voulez supprimer, dans ce cas
Sub remplacer()
    [B10].Select
    Selection.Replace What:=Chr(10), Replacement:="", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
End Sub

avec ceci , cela fonctionne
Cdlt
0
Vaucluse Messages postés 27336 Statut Contributeur 6 441
 
Re Frenchie
alors la suppression du retour chariot fonctionne aussi par formule avec:
SUBSTITUE(B1;CAR(10);"")
mais vu le volume du fichier, c'est évidemment plus léger en VBA
crdlmnt
0
Frenchie83 Messages postés 2254 Statut Membre 339
 
Effectivement ça marche aussi bien
Bonne journée
0