supprimer les espaces entre les mots

[kali]

Bonjour,

J'ai dans dans ma cellule plusieurs mots:
ex : "A LA BONNE RENOMMEE"

et je voudrais qu'ils deviennent:

"fr\marques\alabonnerenommee.fr"


Quelle macro utiliser ?

Merci

 

[Roland]

Bonsoir Kali

Ceci devrait faire l'affaire

Function sup_espaces(tx As String) As String
For i = 1 To Len(tx)
If Mid(tx, i, 1) <> " " Then sup_espaces = sup_espaces & Mid(tx, i, 1)
Next i
End Function

A loger dans un module de code VBA et à insérer dans une cellule Insertion - Fonctions - Personnalisées



Bonne nuit Roland

 

[andré]

Bonjour kali et Roland,

Solution par formule (dans une autre cellule) :="fr\marques\"&MINUSCULE(SUBSTITUE(A1;" ";""))&".fr"


Bonne journée
Ândré.