Supprimer les espaces

@

@Christophe@

Guest

• 15 Janvier 2003

• #2

Bonjour Bruno, bonjour forum

Ou je comprends pas bien, ou tu veux deux fois la meme chose??

Dans une base de donnée j'ai une liste de produit du style :
Produit 25 250 Gr x 10

Je voudrais enlever tous les espaces inutile pour avoir :
Produit 25 250 Gr x 10

Ce que tu veux avoir est identique a ce que tu as!

"Option explicit" comme dirait Thierry

Merci

Christophe

 

Vote positif 0 Vote négatif

V

Vériland

Guest

• 15 Janvier 2003

• #3

Bonjour Bruno et Bonjour le forum,

Hi hi hi...mais d'après ce que je comprends il s'agirait d'enlever les espaces ?...mais quels espaces !!??!!

car le résultat présenté sur ton post a le même aspect qu'au départ...

Produit 25 250 Gr x 10...lol

maintenant reste à savoir comment se présente l'affichage...s'il provient d'une seule cellule ou de plusieurs...question!!...lol

A+ Vériland...(qui à du retard...lol)

 

Vote positif 0 Vote négatif

V

Vériland

Guest

• 15 Janvier 2003

• #4

Salut Christophe...pareille pour la question...c'est pas claire son espace...lol

 

Vote positif 0 Vote négatif

B

Bruno

Guest

• 15 Janvier 2003

• #5

Revoici ma question,

Dans ma base de donnée j'ai une liste de produit du style :
Produit.........25............ 250 Gr x......10

(Les pointillers corresponds a mes espaces)

Je voudrais enlever tous les espaces inutile pour avoir un seule espace entre chaque mot:
Produit 25 250 Gr x 10

Est il possible de le faire en Vba ?

merci de votre aide à tous

 

Vote positif 0 Vote négatif

V

Vériland

Guest

• 15 Janvier 2003

• #6

Re Bruno,

Bon j'ai bien compris le soucis de tes espaces...mais la source elle provient d'où...d'un autre fichier ? d'un feuille ? d'une cellule ?, d'un fichier texte ?

A+ Vériland

 

Vote positif 0 Vote négatif

B

Bruno

Guest

• 15 Janvier 2003

• #7

Re Vériland

la source provient d'un autre fichier.

@+

 

Vote positif 0 Vote négatif

V

Vériland

Guest

• 15 Janvier 2003

• #8

Ok merci Bruno...je regarde pour la solution...(mais j'suis pas tout seul...lol)

A+ Vériland

 

Vote positif 0 Vote négatif

R

Roux Christian

Guest

• 15 Janvier 2003

• #9

Il faut une macro qui remplace deux espages (" "), par un espace; et il faut la lancer un certain nombre de fois:

Sub Macro1()
Cells.Replace What:=" ", Replacement:=" ", LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False
End Sub

 

Vote positif 0 Vote négatif

P

pat5

Guest

• 15 Janvier 2003

• #10

Salut le forum

Si tu es préssé

Edition Remplacer 2espace par 1espace Remplacer tout plusieurs fois et tu y arrive

Par contre je voudrais bien la macro moi aussi

Salut ;o)

 

Vote positif 0 Vote négatif

B

Bruno

Guest

• 15 Janvier 2003

• #11

Merci a tous pour votre aide

J'ai une autre solution : =SUPPRESPACE(A1)

et cela supprime tous les espaces en trop

@+

 

Vote positif 0 Vote négatif

P

pat5

Guest

• 15 Janvier 2003

• #12

si tu avais demandé une formule, on te l'aurait donnée.

Vériland lorsque tu aura fini d'engueuler fabrice, tu pense à la macro.
Merçi. Qu'est-ce-qu'on rigole !!!!

Salut Vériland A+ ;o)

 

Vote positif 0 Vote négatif

V

Vériland

Guest

• 15 Janvier 2003

• #13

Hi hi hi...elle est trop forte ta réponse Bruno...figure toi que je l'avais déjà cette réponse...mais je partais sur une Macro d'après ta demande initiale...

Est il possible de le faire en Vba ?

or ceci n'est qu'une simple formule...mdr

bon ben bonne journée...lol

A+ Vériland

 

Vote positif 0 Vote négatif

V

Vériland

Guest

• 15 Janvier 2003

• #14

Salut Pat5 et le forum,

Alors pour vous répondre...la même chose par macro...

en prenant pour exemple que dans la cellule C1 il y ait : Bruno________ne_______veut________pas_______d'espace

avec cette macro :

Sub espace()
Range("A1").Formula = "=TRIM(c1)"
End Sub

dans la cellule A1 s'affichera : Bruno ne veut pas d'espace...hi hi hi

A+ Vériland

 

Vote positif 0 Vote négatif

P

pat5

Guest

• 15 Janvier 2003

• #15

Merçi Vériland

et si simple, comme quoi desfois

Salut ;o)

 

Vote positif 0 Vote négatif