Insérer un espace entre les lettres

[bataggone]

Bonjour,
encore une question
je n arrive pas a trouver une macro pour insérer un espace entre les lettres et les chiffres dans une cellule.
par exp:
Excel Downloads= E x c e l D o w n l o a d s.
et merci

 

[BOISGONTIER]

Re : Insérer un espace entre les lettres

Bonjour,

Function espace(mot)
  For i = 1 To Len(mot)
    temp = temp & Mid(mot, i, 1) & " "
  Next i
  espace = temp
End Function

JB

 

[bataggone]

Re : Insérer un espace entre les lettres

Re bonjour
merci BOISGONTIER très gentil de ta paaaaaaaaaaaaaart

 

[job75]

Re : Insérer un espace entre les lettres

Bonjour bataggone, salut JB,

On peut aussi télécharger sur le web (c'est gratuit) la macro complémentaire Morefunc de Laurent Longre.

C'est une bibliothèque de fonctions avec entre autre la fonction MCONCAT.

Elle permet de concatener des matrices.

Donc si vous l'avez, le texte étant en A1, entrez en B1 :

=MCONCAT(STXT(A1;LIGNE(INDIRECT("1:"& NBCAR(A1)));1);" ")

C'est une formule matricielle à valider par Ctrl+Maj+Entrée.

Nota : perso j'ai Morefunc sur XP/Excel 2003, pas pu la télécharger sur Seven/Excel 2010.

A+