OVH Cloud OVH Cloud

Supp espace multiples

6 réponses
Avatar
Alain79
Existe t'il une fonction permettant de supprimer directement une suite
d'espaces multiples au sein d'une chaîne de caractères pour les remplacer
par un espace unique - Je pense avoir déjà vu cette fonction mais ma mémoire
fait défaut...
Genre "Trim" qui supprime les espaces situés en début et en fin de chaîne...
mais travaillant au sein de la chaîne...

Merci à vous
Alain79

6 réponses

Avatar
garnote
Salut Alain,

Il doit bien y avoir un équivalent VBA de
cette fonction, non ?

=SUPPRESPACE(A1)

Serge

"Alain79" a écrit dans le message de
news: c108ri$5ao$
Existe t'il une fonction permettant de supprimer directement une suite
d'espaces multiples au sein d'une chaîne de caractères pour les remplacer
par un espace unique - Je pense avoir déjà vu cette fonction mais ma
mémoire

fait défaut...
Genre "Trim" qui supprime les espaces situés en début et en fin de
chaîne...

mais travaillant au sein de la chaîne...

Merci à vous
Alain79




Avatar
garnote
Salut Michel,

Mais alors,

Application.WorksheetFunction.Trim(" Beaucoup d'espaces . ")

devrait convenir, à moins qu'on ne veuille pas supprimer les
espaces du début et de la fin.

Serge


"Michel Gaboly" a écrit dans le message de news:

Salut Serge,

L'équivalent VBA, c'est Trim, la fonction qu'il cite ;-))

mais il s'agit d'un équivalent partiel, qui comme il l'indique, ne
supprime

les espaces qu'en début et fin de chaîne.

Trim(" Beaucoup d'espaces . ")

renvoie

"Beaucoup d'espaces ."


Cependant, la fonction de feuille de calcul SUPPRESPACE(), qui s'appelle
également TRIM en anglais est disponible à partir de VBA :

Application.WorksheetFunction.Trim(" Beaucoup d'espaces .
")


renvoie

"Beaucoup d'espaces."




Salut Alain,

Il doit bien y avoir un équivalent VBA de
cette fonction, non ?

=SUPPRESPACE(A1)

Serge

"Alain79" a écrit dans le message
de


news: c108ri$5ao$
Existe t'il une fonction permettant de supprimer directement une suite
d'espaces multiples au sein d'une chaîne de caractères pour les
remplacer



par un espace unique - Je pense avoir déjà vu cette fonction mais ma
mémoire

fait défaut...
Genre "Trim" qui supprime les espaces situés en début et en fin de
chaîne...

mais travaillant au sein de la chaîne...

Merci à vous
Alain79





--
Cordialement,

Michel Gaboly
http://www.gaboly.com






Avatar
Michel Gaboly
Salut Serge,

L'équivalent VBA, c'est Trim, la fonction qu'il cite ;-))

mais il s'agit d'un équivalent partiel, qui comme il l'indique, ne supprime
les espaces qu'en début et fin de chaîne.

Trim(" Beaucoup d'espaces . ")

renvoie

"Beaucoup d'espaces ."


Cependant, la fonction de feuille de calcul SUPPRESPACE(), qui s'appelle
également TRIM en anglais est disponible à partir de VBA :

Application.WorksheetFunction.Trim(" Beaucoup d'espaces . ")

renvoie

"Beaucoup d'espaces."




Salut Alain,

Il doit bien y avoir un équivalent VBA de
cette fonction, non ?

=SUPPRESPACE(A1)

Serge

"Alain79" a écrit dans le message de
news: c108ri$5ao$
Existe t'il une fonction permettant de supprimer directement une suite
d'espaces multiples au sein d'une chaîne de caractères pour les remplacer
par un espace unique - Je pense avoir déjà vu cette fonction mais ma
mémoire

fait défaut...
Genre "Trim" qui supprime les espaces situés en début et en fin de
chaîne...

mais travaillant au sein de la chaîne...

Merci à vous
Alain79





--
Cordialement,

Michel Gaboly
http://www.gaboly.com


Avatar
garnote
Et si on ne veut pas supprimer les espaces
du début et de la fin, hein ?

Serge

"Michel Gaboly" a écrit dans le message de news:

C'est bien ce que j'ai tenté d'exprimer ;-)))


Salut Michel,

Mais alors,

Application.WorksheetFunction.Trim(" Beaucoup d'espaces .
")



devrait convenir, à moins qu'on ne veuille pas supprimer les
espaces du début et de la fin.

Serge

"Michel Gaboly" a écrit dans le message de news:

Salut Serge,

L'équivalent VBA, c'est Trim, la fonction qu'il cite ;-))

mais il s'agit d'un équivalent partiel, qui comme il l'indique, ne
supprime

les espaces qu'en début et fin de chaîne.

Trim(" Beaucoup d'espaces . ")

renvoie

"Beaucoup d'espaces ."


Cependant, la fonction de feuille de calcul SUPPRESPACE(), qui
s'appelle



également TRIM en anglais est disponible à partir de VBA :

Application.WorksheetFunction.Trim(" Beaucoup d'espaces .
")


renvoie

"Beaucoup d'espaces."




Salut Alain,

Il doit bien y avoir un équivalent VBA de
cette fonction, non ?

=SUPPRESPACE(A1)

Serge

"Alain79" a écrit dans le
message




de
news: c108ri$5ao$
Existe t'il une fonction permettant de supprimer directement une
suite





d'espaces multiples au sein d'une chaîne de caractères pour les
remplacer



par un espace unique - Je pense avoir déjà vu cette fonction mais
ma





mémoire
fait défaut...
Genre "Trim" qui supprime les espaces situés en début et en fin de
chaîne...

mais travaillant au sein de la chaîne...

Merci à vous
Alain79





--
Cordialement,

Michel Gaboly
http://www.gaboly.com





--
Cordialement,

Michel Gaboly
http://www.gaboly.com








Avatar
Michel Gaboly
C'est bien ce que j'ai tenté d'exprimer ;-)))


Salut Michel,

Mais alors,

Application.WorksheetFunction.Trim(" Beaucoup d'espaces . ")

devrait convenir, à moins qu'on ne veuille pas supprimer les
espaces du début et de la fin.

Serge

"Michel Gaboly" a écrit dans le message de news:

Salut Serge,

L'équivalent VBA, c'est Trim, la fonction qu'il cite ;-))

mais il s'agit d'un équivalent partiel, qui comme il l'indique, ne
supprime

les espaces qu'en début et fin de chaîne.

Trim(" Beaucoup d'espaces . ")

renvoie

"Beaucoup d'espaces ."


Cependant, la fonction de feuille de calcul SUPPRESPACE(), qui s'appelle
également TRIM en anglais est disponible à partir de VBA :

Application.WorksheetFunction.Trim(" Beaucoup d'espaces .
")


renvoie

"Beaucoup d'espaces."




Salut Alain,

Il doit bien y avoir un équivalent VBA de
cette fonction, non ?

=SUPPRESPACE(A1)

Serge

"Alain79" a écrit dans le message
de


news: c108ri$5ao$
Existe t'il une fonction permettant de supprimer directement une suite
d'espaces multiples au sein d'une chaîne de caractères pour les
remplacer



par un espace unique - Je pense avoir déjà vu cette fonction mais ma
mémoire

fait défaut...
Genre "Trim" qui supprime les espaces situés en début et en fin de
chaîne...

mais travaillant au sein de la chaîne...

Merci à vous
Alain79





--
Cordialement,

Michel Gaboly
http://www.gaboly.com





--
Cordialement,

Michel Gaboly
http://www.gaboly.com




Avatar
FxM
Bonsoir,

Quelque chose comme :
Sub test()
Message = " Hello World "
l1 = Len(Message)
l2 = 0
Do Until l1 = l2
l1 = Len(Message)
Message = Replace(Message, " ", " ")
l2 = Len(Message)
Loop
msgbox message
End Sub

@+
FxM




garnote wrote:

Et si on ne veut pas supprimer les espaces
du début et de la fin, hein ?

Serge

"Michel Gaboly" a écrit dans le message de news:


C'est bien ce que j'ai tenté d'exprimer ;-)))



Salut Michel,

Mais alors,

Application.WorksheetFunction.Trim(" Beaucoup d'espaces .



")

devrait convenir, à moins qu'on ne veuille pas supprimer les
espaces du début et de la fin.

Serge

"Michel Gaboly" a écrit dans le message de news:


Salut Serge,

L'équivalent VBA, c'est Trim, la fonction qu'il cite ;-))

mais il s'agit d'un équivalent partiel, qui comme il l'indique, ne


supprime

les espaces qu'en début et fin de chaîne.

Trim(" Beaucoup d'espaces . ")

renvoie

"Beaucoup d'espaces ."


Cependant, la fonction de feuille de calcul SUPPRESPACE(), qui




s'appelle

également TRIM en anglais est disponible à partir de VBA :

Application.WorksheetFunction.Trim(" Beaucoup d'espaces .


")

renvoie

"Beaucoup d'espaces."





Salut Alain,

Il doit bien y avoir un équivalent VBA de
cette fonction, non ?

=SUPPRESPACE(A1)

Serge

"Alain79" a écrit dans le





message

de

news: c108ri$5ao$

Existe t'il une fonction permettant de supprimer directement une






suite

d'espaces multiples au sein d'une chaîne de caractères pour les




remplacer

par un espace unique - Je pense avoir déjà vu cette fonction mais






ma

mémoire

fait défaut...
Genre "Trim" qui supprime les espaces situés en début et en fin de


chaîne...

mais travaillant au sein de la chaîne...

Merci à vous
Alain79





--
Cordialement,

Michel Gaboly
http://www.gaboly.com





--
Cordialement,

Michel Gaboly
http://www.gaboly.com